Front page | perl.beginners |
Postings from February 2002
From: John W. Krahn
February 28, 2002 11:28
Message ID: 3C7E8509.E904BBA5@acm.org
> On Wed, 27 Feb 2002 16:11:55 -0800, firstname.lastname@example.org (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
> >my $pre_paid_hours = $1 if $text =~ /Pre-paid\s+hours:\s+([\d.]+)/i;
> >my $hours_used_so_far = $1 if $text =~
> ># 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';