This is the revision history for tempconv in <freenode.net:#perlbot>
factoid_id | subject | copula | predicate | author | namespace |
---|---|---|---|---|---|
16152 | tempconv | is | `eval use Encode;%f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!; `call _tempconv_internal `arg!!! Not supported, use °C, °D, °F, GM, K, °N, R, °Ré, °Rø, °€ |
simcop2387 | <*:##NULL> |
16150 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!; `call _tempconv_internal `arg!!! ERROR: Undefined subroutine &main::decode called at (IRC) line 1. |
simcop2387 | <*:##NULL> |
16149 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!; `fact _tempconv_internal!! Bareword found where operator expected (Do you need to predeclare "No"?) at (IRC) line 1, near "No factoid" Unquoted string "factoid" may clash with future reserved word at (IRC) line 1. ERROR: syntax error at (IRC) line 1, near "No factoid " Execution of (IRC) aborted due to compilation errors. |
simcop2387 | <*:##NULL> |
16146 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{qw/v u/};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);(eval{inv($f2{$q},$c)}//"UND ").$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",sort{d($a)cmp Not Available |
simcop2387 | <*:##NULL> |
15926 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{qw/v u/};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);(eval{inv($f2{$q},$c)}//"UND ").$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",sort{d($a)cmp d($b)}keys%f)}! Not supported, use °C, °D, °F, GM, K, °N, R, °Ré, °Rø, °€ |
simcop2387 | <*:##NULL> |
13855 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);(eval{inv($f2{$q},$c)}//"UND ").$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",sort{d($a)cmp d($b)}keys%f)}! Unquoted string "v" may clash with future reserved word at (IRC) line 1. Unquoted string "u" may clash with future reserved word at (IRC) line 1. 11.72°C = 132.42°D = 53.10°F = ~2.12e-03GM = 284.87K = 3.87°N = 512.77R = 9.38°Ré = 13.65°Rø = 32.41°€ |
simcop2387 | <*:##NULL> |
13853 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);eval{inv($f2{$q},$c)}//"UND ".$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",sort{d($a)cmp d($b)}keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13852 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);eval{inv($f2{$q}},$c)}//"UND ".$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",sort{d($a)cmp d($b)}keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13851 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);eval{inv($f2{$q}}//"UND ",$c).$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",sort{d($a)cmp d($b)}keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13071 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);inv($f2{$q},$c).$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",sort{d($a)cmp d($b)}keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13070 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);inv($f2{$q},$c).$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",map{uc$_}sort{d($a)cmp d($b)}keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13067 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);inv($f2{$q},$c).$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",map{uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13066 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);inv($f2{$q},$c).$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",map{uc$_}sort{d($a)cmp d($b}keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13065 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);inv($f2{$q},$c).$_}sort{d($a)cmp d($b)} keys%f}else{"Not supported, use ".join(", ",map{uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13064 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);inv($f2{$q},$c).$_}sort{d($a)cmpd($b)} keys%f}else{"Not supported, use ".join(", ",map{uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13063 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);inv($f2{$q},$c).$_}sort map{d($_)}keys%f}else{"Not supported, use ".join(", ",map{uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13060 | tempconv | is | `eval %f=(`fact _tempconv_units!);`fact _tempconv_newton!;`fact _tempconv_init!;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{fc$u}->($v);join" = ",map{$q=d($_);inv($f2{$q},$c).$_}sort keys%f}else{"Not supported, use ".join(", ",map{uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13042 | tempconv | is | `eval %f=(`fact _tempconv_units!);%f2=((map{s/°//;lc$_=>$f{$_}}keys%f),%f);$ur=join"|",keys%f2;$in=`quote d `arg!!;return $in; if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};[$u, $v]}else{"Not supported, use ".join(", ",map{uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13041 | tempconv | is | `eval %f=(`fact _tempconv_units!);%f2=((map{s/°//;lc$_=>$f{$_}}keys%f),%f);$ur=join"|",keys%f2;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};[$u, $v]}else{"Not supported, use ".join(", ",map{uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13040 | tempconv | is | `eval %f=(`fact _tempconv_units!);%f2=((map{s/°//;lc$_=>$f{$_}}keys%f),%f);`fact _tempconv_newton!;$ur=join"|",keys%f2;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{lc$u}->($v);join" = ",map{inv($f2{lc$_},$c).$_}sort keys%f}else{"Not supported, use ".join(", ",map{uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13038 | tempconv | is | `eval %f=(`fact _tempconv_units!);%f2=((map{s/°//;lc$_=>$f{$_}}keys%f),%f);`fact _tempconv_newton!;$ur=join"|",keys%f;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{lc$u}->($v);join" = ",map{inv($f2{lc$_},$c).$_}sort keys%f}else{"Not supported, use ".join(", ",map{uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13037 | tempconv | is | `eval %f=(`fact _tempconv_units!);%f2=((map{s/°//;lc$_=>$f{$_}}keys%f),%f);`fact _tempconv_newton!;$ur=join"|",keys%f;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{lc$u}->($v);join" = ",map{inv($f2{lc$_},$c).$_}sort keys%f}else{"Please input a temperature in ".join(", ",map{uc$_}sort Not Available |
simcop2387 | <*:##NULL> |
13034 | tempconv | is | `eval %f=(`fact _tempconv_units!);%f2=((map{lc$_=>$f{$_}}keys%f),%f);`fact _tempconv_newton!;$ur=join"|",keys%f;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f2{lc$u}->($v);join" = ",map{inv($f2{lc$_},$c).$_}sort keys%f} else {"Please input a temperatures in ".join(", ",map {uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13023 | tempconv | is | `eval use Function::Parameters;%f=(`fact _tempconv_units!);`fact _tempconv_newton!;$ur=join"|",keys%f;$in=`quote d `arg!!;if($in=~/(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i){($v,$u)=@+{v,u};$c=$f{lc$u}->($v);join" = ",map{inv($f{lc$_},$c).uc($_)}sort keys%f} else {"Please input a temperatures in ".join(", ",map {uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
13022 | tempconv | is | `eval use Function::Parameters;%f=(`fact _tempconv_units!);`fact _tempconv_newton!;$ur=join"|",keys %f;$t=`quote d `arg!!;if ($t =~ /(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i) {($v,$u)=@+{v,u}; $c=$f{lc $u}->($v); join " = ", map{inv($f{lc$_}, $c).uc($_)} sort keys %f} else {"Please input a temperatures in ".join(", ", map {uc$_}sort Not Available |
simcop2387 | <*:##NULL> |
13018 | tempconv | is | `eval use Function::Parameters;`fact _tempconv_units!;`fact _tempconv_newton!;$ur=join"|",keys %f;$t=`quote d `arg!!;if ($t =~ /(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i) {($v,$u)=@+{v,u}; $c=$f{lc $u}->($v); join " = ", map{inv($f{lc$_}, $c).uc($_)} sort keys %f} else {"Please input a temperatures in ".join(", ", map {uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
12984 | tempconv | is | `eval use Function::Parameters;`fact _tempconv_units!; $ur=join"|",keys %f; $t=`quote d `arg!!; if ($t =~ /(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i) {($v,$u)=@+{v,u}; $c=$f{lc $u}->($v); join " = ", map{sprintf "%0.02f%s",$t{$_}->($c),uc($_)} sort keys %t} else {"Please input a temperatures in ".join(", ", map {uc$_}sort keys%f)}! Not Available |
simcop2387 | <*:##NULL> |
12977 | tempconv | is | `eval `fact _tempconv_units!; $ur=join"|",keys %from; $t=`quote d `arg!!; if ($t =~ /(?<v>[\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(?<u>$ur)/i) {($v,$u)=@+{v,u}; $c=$from{lc $u}->($v); join " = ", map{sprintf "%0.02f%s",$to{$_}->($c),uc($_)} sort keys %to} else {"Please input a temperatures in ".join(", ", map {uc$_}sort keys%from)}! Not Available |
simcop2387 | <*:##NULL> |
10249 | tempconv | is | <eval $t="<arg>"; if ($t =~ /([\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(?:\s*°)?\s*(c|f|k)/i){$n=$1;$s=lc$2;if($s eq "k"){$c=$n-273.15}elsif($s eq"c"){$c=$n}elsif($s eq"f"){$c=($n-32)/1.8};$f=$c*1.8+32;$k=$c+273.15;$q="%0.02f";sprintf"${q}°F = ${q}°C = ${q}K",$f,$c,$k;}else{"Please input a temperature in F, C, or K"} > Not Available |
simcop2387 | <*:##NULL> |
5980 | tempconv | is | <eval $t="<arg>"; if ($t =~ /([\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)\s*(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"${n}K is ".($n-273.15)."C and ".(($n-273.15)*1.8+32)."F"} elsif ($s eq "c") {"${n}C is ".($n+273.15)."K and ".($n*1.8+32)."F"} else {"${n}F is ".(($n-32)/1.8)."C and ".(($n-32)/1.8+273.15)."K"}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5979 | tempconv | is | <eval $t="<arg>"; if ($t =~ /([\-+]?\d+(?:\.\d+)?(?:ee?[\-+]?\d+)?)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"${n}K is ".($n-273.15)."C and ".(($n-273.15)*1.8+32)."F"} elsif ($s eq "c") {"${n}C is ".($n+273.15)."K and ".($n*1.8+32)."F"} else {"${n}F is ".(($n-32)/1.8)."C and ".(($n-32)/1.8+273.15)."K"}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5978 | tempconv | is | <eval $t="<arg>"; if ($t =~ /(-?\d+(?:\.\d+)?(?:ee?\d+)?)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"${n}K is ".($n-273.15)."C and ".(($n-273.15)*1.8+32)."F"} elsif ($s eq "c") {"${n}C is ".($n+273.15)."K, ".($n*1.8+32)."F"} else {"${n}F is ".(($n-32)/1.8)."C and ".(($n-32)/1.8+273.15)."K"}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5977 | tempconv | is | <eval $t="<arg>"; if ($t =~ /(-?\d+(?:\.\d+)?)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"${n}K is ".($n-273.15)."C and ".(($n-273.15)*1.8+32)."F"} elsif ($s eq "c") {"${n}C is ".($n+273.15)."K, ".($n*1.8+32)."F"} else {"${n}F is ".(($n-32)/1.8)."C and ".(($n-32)/1.8+273.15)."K"}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5976 | tempconv | is | <eval $t="<arg>"; if ($t =~ /(-?\d+)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"${n}K is ".($n-273.15)."C and ".(($n-273.15)*1.8+32)."F"} elsif ($s eq "c") {"${n}C is ".($n+273.15)."K, ".($n*1.8+32)."F"} else {"${n}F is ".(($n-32)/1.8)."C and ".(($n-32)/1.8+273.15)."K"}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5975 | tempconv | is | <eval $t="<arg>"; if ($t =~ /(-?\d+)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"${n}K is ".($n-273.15)."C and ".(($n-273.15)*1.8+32)."F"} elsif ($s eq "c") {"${n}C is ".($n+273.15)."K, ".($n*1.8+32)."F"} else {"${n}F is ".(($n-32)/1.8)."C and ".(($n-32)/1.8+273.15)."K"}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5974 | tempconv | is | <eval $t="<arg>"; if ($t =~ /(-?\d+)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"$n k is ".($n-273.15)." c, ".(($n-273.15)*1.8+32)." f"} elsif ($s eq "c") {"$n c is ".($n+273.15)." k, ".($n*1.8+32)." f"} else {"$n f is ".(($n-32)/1.8)." c, ".(($n-32)/1.8+273.15)." k"}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5973 | tempconv | is | <eval $t="<arg>"; if ($t =~ /(-?\d+)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"$n k is ".($n-273.15)." c, ".(($n-273.15)*1.8+32)." f"} elsif ($s eq "c") {"$n c is ".($n+273.15)." k, ".($n*1.8+32)." f"} else {}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5972 | tempconv | is | <eval $t="<arg>"; if ($t =~ /(-?\d+)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"$n $k is ".($n-273.15)." c, ".(($n-273.15)*1.8+32)." f"}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5971 | tempconv | is | <eval $t="<arg>"; if ($t =~ /(-?\d+)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"$n $k is ".($n-273.15)." c, ".(($n-273.15)*1.8+32)}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5970 | tempconv | is | <eval $t="<arg>"; if ($t =~ /(-?\d+)(c|f|k)/i) {$n=$1; $s=lc$2; if ($s eq "k"){"$n $k is ".($n-273.15)." c, ")}} else {"please enter something like 40C, -40f or 40k"} > Not Available |
simcop2387 | <*:##NULL> |
5969 | tempconv | is | <eval $t=<arg>; $t> Not Available |
simcop2387 | <*:##NULL> |
5968 | tempconv | is | <eval $t=<arg>; $r> Not Available |
simcop2387 | <*:##NULL> |