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

factoid_idsubjectcopulapredicateauthornamespace
11186 ohms_law is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $2}=$1 while ($arg=~/(?:^|\s)([\d\.\-]+)\s*?([aowv])/ig); $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available
simcop2387 <*:##NULL>
11184 ohms_law is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $2}=$1 while ($arg=~/(?:^|\s)([\d\.\-]+)([aowv])/ig); $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available
simcop2387 <*:##NULL>
11183 ohms_law is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $2}=$1 while ($arg=~/(?:^|\s)([\d\.\-]+)([aowv])/ig); return \%h; $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available
simcop2387 <*:##NULL>
11182 ohms_law is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $2}=$1 while ($arg=~/(^|\s)([\d\.\-]+)([aowv])/ig); return \%h; $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available
simcop2387 <*:##NULL>
11181 ohms_law is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $2}=$1 while ($arg=~/([\d\.\-]+)([aowv])\S+?/ig); return \%h; $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available
simcop2387 <*:##NULL>
11180 ohms_law is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $2}=$1 while ($arg=~/([\d\.\-]+)([aowv])\S+/ig); return \%h; $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available
simcop2387 <*:##NULL>
11179 ohms_law is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $2}=$1 while ($arg=~/([\d\.\-])([aowv])\S+/ig); return \%h; $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available
simcop2387 <*:##NULL>
11177 ohms_law is <eval <fact _ohms_law>; $arg=<quote d <arg>>; my %h; $h{lc $2}=$1 while ($arg=~/([\d\.\-])([aowv])\S+/ig); $r=calc %h; sprintf "%f Amps, %f Volts, %f Ohms, %f Watts", @$r;>
Not Available
simcop2387 <*:##NULL>
11176 ohms_law 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>