if I do not call build_db then alert will run fine as I want it to so is there
away around this problem. See I need the FILEIN to go though a number of
different sub routes how would I go about this.
On Sunday 09 Feb 2003 4:39 pm, 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
> }
--
Thank You
Benjamin Jeeves
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
