take the file name in as an argument of the function

[Booher Timothy B 1stLt AFRL/MNAC]

Hello all.

I want to be able to take the file name in as an argument of the function,
for example:

%Extract.pl MyFile.txt

I know that I could use:

#!/usr/bin/perl
while (<>) {

}

But how could I take two arguments from the command line:

i.e. my guess:

%Test.pl "Foo" "Bar"

#/!/usr/bin/perl
 $A = $ARGV[0];
 $B = $ARGV[1];
        print "Thing A: $A          Thing B: $B";

Thanks,

Tim