>perl test.plx a b
one
two
three