Passing awk variable in perl -e call

Shell Programming and Scripting
1

Hi. I am on a Solaris box and have an awk script which calls perl via the command line:

timeTester="'"`perl -e 'use Time::Local;my $time = timelocal(10,10,10,10,10,2011
);print $time'`"'"

But I want to pass awk variables into this call. These are the example awk variables:

secondField = 10
minuteField = 10
hourField = 10
dayField = 10
monthDigit = 03
currentYear = 2011

So I need a call that looks like this:

timeTester="'"`perl -e 'use Time::Local;my $time = timelocal(secondField,minuteField,hourField,dayField,monthDigit,currentYear
);print $time'`"'"

Does anyone know how to pass the actual awk variable values into this call. There must be some sort of escape character or method. Its driving me mad :wink: