$ 5.14t/bin/perl a.pl
xxx