Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl

...
    print "Range: @$range\n";
    dd \%wanted;
}
  2. or download this
    $ cat pm_1204589_IN1
>Z
...
GHI
>W
JKL
  3. or download this
    $ cat pm_1204589_IN2
W
X
Y
Z
  4. or download this
    Range: 0
{ W => "JKL" }
...
{ X => "GHI", Y => "DEF", Z => "ABC" }
Range: 3
{ Z => "ABC" }