Zachary Buckholz wrote:
>
> Original::
> avg_resp_time => [ qw(@$avg_resp_time[0]
> @$avg_resp_time[1]
> @$avg_resp_time[2]
> @$avg_resp_time[3]
> @$avg_resp_time[4]
> @$avg_resp_time[5]
> @$avg_resp_time[6]) ],
> Modification::
> avg_resp_time => [ (@$avg_resp_time[0],
> @$avg_resp_time[1],
> @$avg_resp_time[2],
> @$avg_resp_time[3],
> @$avg_resp_time[4],
> @$avg_resp_time[5],
> @$avg_resp_time[6]) ],
>
> Now this works
> $email_vars->{avg_resp_time}[0]
The quote words (qw) operator does not interpolate variables like a
double quoted string does. The following are equivalent:
@x = qw($f $g $h $i);
@x = ('$f','$g','$h','$i');
@x = ("\$f","\$g","\$h","\$i");
Also, instead of writing:
avg_resp_time => [ (@$avg_resp_time[0],
@$avg_resp_time[1],
@$avg_resp_time[2],
@$avg_resp_time[3],
@$avg_resp_time[4],
@$avg_resp_time[5],
@$avg_resp_time[6]) ],
This will do the same thing:
avg_resp_time => [ @$avg_resp_time[0..6] ],
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
