桜ヶ丘日記

技術メモとかとか

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