Select Code to Download

c:\test>junk33 sk0oid | find "33.33%" | wc -l
    543

c:\test>junk33 sk0oid | find "33.33%"
sk0oid has a 33.33% chance of being: abroad
...
sk0oid has a 33.33% chance of being: vetoed
sk0oid has a 33.33% chance of being: viscid
sk0oid has a 33.33% chance of being: zeroed

#! perl -slw
use strict;
...
        $match / length( $good ) * 100;
}