Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
    "my $s = 'KE a KE bb ccc KE ddd PA ee KE fff xx PA gg KEPA h';
    ...
    "
    'KE a KE bb ccc KE ddd PA ee KE fff xx PA gg KEPA h'
    'KE ddd PA' 'KE fff xx PA' 'KEPA'