#/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.";
Iy91c3IvYmluL3BlcmwvCgokY2VsID0gJzAnOwokZmFociA9ICcwJzsKCnByaW50ICdFbnRlciB0ZW1wZXJhdHVyZSBpbiBDZWxzaXVzOiAnOwokY2VsID0gPD47CgokZmFociA9ICRjZWwgKiA5LzUgKyAzMjsKCnByaW50ICIkY2VsIGRlZ3JlZXMgQ2Vsc2l1cyBpbiBGYWhyZW5oZWl0IGlzICRmYWhyLiI7Cgo=