This is the revision history for _test in <freenode.net:#perlbot>

factoid_idsubjectcopulapredicateauthornamespace
11175 _test is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $2}=$1 while ($arg=~/\b(\S+)([aowv])/ig); $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available		 simcop2387 <*:##NULL>
11173 _test is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $1}=$2 while ($arg=~/\b(\S+)([aowv])/ig); $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available		 simcop2387 <*:##NULL>
11172 _test is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $1}=$2 while ($arg=~/\b(\S+)([aowv])/g); $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available		 simcop2387 <*:##NULL>
11170 _test is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $1}=$2 while ($arg=~/([arpv])(\S+)/g); $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available		 simcop2387 <*:##NULL>
11169 _test is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $1}=$2 while ($arg=~/([arpv])(\S+)/g); $r=calc \%h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available		 simcop2387 <*:##NULL>
11168 _test is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $1}=$2 while ($arg=~/([arpv])(\S+)/g); return \%h; $r=calc \%h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available		 simcop2387 <*:##NULL>
11166 _test is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $1}=$2 while ($arg=~/([arpv])(\S+)/g); $r=calc \%h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available		 simcop2387 <*:##NULL>
11165 _test is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $1}=$2 while ($arg=~/([arpv])(\S+)/g); \%h>
Not Available		 simcop2387 <*:##NULL>
11164 _test is `eval `fact _ohms_law~; $arg=`quote d `arg~~; ~
Not Available		 simcop2387 <*:##NULL>
10930 _test is {encode_reserved => 1} simcop2387 <*:##NULL>