@args = qw( perl, @ARGV );