On Sun, Feb 09, 2003 at 04:39:00PM +0000, Benjamin Jeeves wrote:
>
> Can someone tell me why my call to build_db() works but when I call alert() it
> will not work as it calls alert but will not enter the while loop I my
> opening the file with
>
> #!/usr/bin/perl
>
> $filein = $ARGV[0];
> open(filein, "$filein");
>
> sub start
> {
>
> for(;;)
> {
> while ( <filein> )
> {
> build_db();
> $counter++;
> alert();
> $counter1++;
> print "$counter..$counter1\n";
> }
> sleep 50;
> seek filein,0,1;
> }
> }
>
> sub alert
> {
> while( <filein> )
> {
> does some thing on pattern matching
> }
With just a quick look I see there is no closing brace on "sub alert" is
that a typo?
kent
--
To know the truth is to distort the Universe.
Alfred N. Whitehead (adaptation)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
