fork download
copy 
  1. #!perl -nl
  2. print$_=/C/?$_+273.15." K":/K/?$_*9/5-459.67." F":5/9*($_-32)." C"for$_,$_
Success #stdin #stdout 0s 6044KB
comments ()
stdin
copy 
23 C
86.987 F
56.99999999 K
stdout
copy 
296.15 K
73.3999999999999 F
30.5483333333333 C
303.698333333333 K
-357.070000018 F
-216.15000001 C
https://ideone.com/40j1HI
language:
Perl (perl 5.28.1)
created:
9 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!