サブルーチンの引数は、"@_"に配列という形で格納されるので、shiftなどで取り出して使う。
perlsub - Perl のサブルーチン - perldoc.jp
渡した文字列を出力するprintStrを定義。
shiftで@_から$argに引数が渡る。
$ vi sub.pl $ perl sub.pl ABCDE $
このように引数が渡っているのが確認できた。
Sample/perl/sub/argument/src/sub at master · bg1bgst333/Sample · GitHub