From: Andreas J. Koenig
> My binary search says 22074
Looks like their are two bugs and two fixes
When does the following program give ":" not 10.
Thanks
Robin
----Program----
#!/usr/bin/perl -l
sub TIESCALAR {
my $foo = $_[1];
bless \$foo, "main";
};
sub FETCH { ${ $_[0]} };
tie my $x, "main", 2;
tie my $y, "main", 8;
print $x | $y;
-------------------------------------------------------------------
This e-mail and any attachments may contain confidential and/or
privileged material; it is for the intended addressee(s) only.
If you are not a named addressee, you must not use, retain or
disclose such information.
NPL Management Ltd cannot guarantee that the e-mail or any
attachments are free from viruses.
NPL Management Ltd. Registered in England and Wales. No: 2937881
Registered Office: Serco House, 16 Bartley Wood Business Park,
Hook, Hampshire, United Kingdom RG27 9UY
-------------------------------------------------------------------
Thread Previous
|
Thread Next