fork download
  1. #/usr/bin/perl/
  2.  
  3. $cel = '0';
  4. $fahr = '0';
  5.  
  6. print 'Enter temperature in Celsius: '
  7. $cel = <STDIN>;
  8.  
  9. $fahr = $cel * 9 / 5 + 32;
  10.  
  11. print "$cel degrees Celsius in Fahrenheit is $fahr.";
  12.  
  13.  
Runtime error #stdin #stdout 0s 4596KB
stdin
Standard input is empty
stdout
Standard output is empty