#/usr/bin/perl/

$cel = '0';
$fahr = '0';

print 'Enter temperature in Celsius: ';
$cel = <>;

$fahr = $cel * 9/5 + 32;

print "$cel degrees Celsius in Fahrenheit is $fahr.";