perlの@ARGVは$hoge=shift;で取れる
知ってました?
$ cat test.pl #!/usr/bin/perl my $hoge0 = shift; my $hoge1 = shift; print qq($hoge0 $hoge1\n); exit; $ ./test.pl foo bar foo bar
知ってました?
$ cat test.pl #!/usr/bin/perl my $hoge0 = shift; my $hoge1 = shift; print qq($hoge0 $hoge1\n); exit; $ ./test.pl foo bar foo bar