Perl に scanf があるかってことか?