Lz wrote:
>
> I do set the line, and thats why I am not sure, why it
> doesn't work:
>
> while ( $line = <STDIN> )
> {
> $idNumber = $line =~ /\((ID\d+)\)/;
You _need_ the parenthesis around $idNumber for it to work properly.
($idNumber) = $line =~ /\((ID\d+)\)/;
> }
>
> print $idNumber; // empty
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
