Select Code to Download

#!/usr/bin/perl
use strict;
...
                  },
    } );
}

$ ./700801.pl

...
s/"+//g 6.78/s      --    -16%    -97%
s/"//g  8.05/s     19%      --    -96%
tr/"//d  211/s   3005%   2515%      --