Select Code to Download

#! perl
use strict;
...
shift for 1 .. 4;
shift =~ m! \[ (.+) , !x;
printf "Rule:                  %s\n", $1;

12:39 >perl 626_SoPW.pl
Time:                  May 20 18:57:27
...
Rule:                  0xa178b29d

12:44 >