That was answered in the original thread.

my( $arg1, $arg2, $arg3 ) = @ARGV
[download]

You don't really need to assign to argX, perl automatically places the command line args in the @ARGV array for you.

-derby