Perlでのshift関数は、普通、配列変数を引数にとり、配列変数から一番若いインデクスの要素を取り出します。 しかし、配列変数の引数がない単独shiftを結構見かけます。 これは、mainモジュールでは「@ARGV」がデフォルトの引数で、sub内では、「@_」がデフ…