Help for this page

Select Code to Download

Select or download this

% perl -MO=Concise
my $s=<>;
...
-           <0> ex-pushmark s ->7
7           <0> padsv[$s:1,3] s ->8
9        <0> padsv[$t:2,3] sRM*/LVINTRO ->a