>>567
>#!/usr/bin/perl
>use warnings;
>if($ARGV[0] eq 'test'){ print "TEST"; }

if("$ARGV[0]" eq 'test'){ print "TEST"; }
適当だけどこれでどう?