Zentara wrote: > > On Wed, 27 Feb 2002 16:11:55 -0800, [EMAIL PROTECTED] (John W. Krahn) wrote: > > > >my $text = <<EOT; > >User data query User data query Time utilization for this billing period > >Pre-paid hours: 744 Hours used so far: 29.55 Excess hours billed at: > >$1.00 per hour Traffic utilization for this billing period Pre-paid > >megabytes: 500 Megabytes used so far: 60.52 Excess Megabytes billed > >at: $0.18 per Megabyte > >EOT > > > >my $pre_paid_hours = $1 if $text =~ /Pre-paid\s+hours:\s+([\d.]+)/i; > >my $hours_used_so_far = $1 if $text =~ > >/Hours\s+used\s+so\s+far:\s+([\d.]+)/i; > ># etc. > > Uh oh John, I got an error when running this. > Use of unitialized value in concantation at my $text = <<EOT
Sorry, I didn't see the dollar sign in the text. > It should be my $text ='EOT'; my $text = <<'EOT'; John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
