substitute variable for values in perl

hi all,
how do i assign values passed in from command line to and sql statement in perl ?? e.g

i want to assign :name1 and :Name2 to be whatever is passed into the perl script command line

my $sqlStr = "select * from test_table where column1 = upper(nvl(:name1, name1 ))   and column2 = upper(nvl(:name2, name2))

thanks in advance.

$ARGV[0] is the first command-line parameter, $ARGV[1] is the second, and so on.