Front page | perl.beginners |
Postings from February 2002
Re: Regex...
Thread Previous
|
Thread Next
From:
John W. Krahn
Date:
February 28, 2002 11:28
Subject:
Re: Regex...
Message ID:
3C7E8509.E904BBA5@acm.org
Zentara wrote:
>
> On Wed, 27 Feb 2002 16:11:55 -0800, krahnj@acm.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
> >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
Thread Previous
|
Thread Next