Harry Putnam wrote:
> david <[EMAIL PROTECTED]> writes:
>
> Won't is still quite even with the eval, in the above case?
>> passing it to Perl
>
> Can you give an example of this?
no it doesn't. if you put it inside an eval{}, it won't quit. consider:
#!/usr/bin/perl -w
use strict;
my $reg = shift;
while(<STDIN>){
chomp;
eval{
print "$_\n" if(/$reg/o);
}
print "ERROR: $@\n" if($@);
}
__END__
again, this is just an example of what you can do. you should consider
quoting your $reg also
david
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
