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