in reply to how to make close() fail
Seems like a completely unnecessary test to me, but ...
sub TIEHANDLE { bless \$_[1], $_[0] };; sub CLOSE{ 0 };; tie *FH, 'main';; close FH or die 'Aaaaaaaaaaaaarg!';; Aaaaaaaaaaaaarg! at (eval 12) line 1, <STDIN> line 4.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: how to make close() fail
by dave_the_m (Monsignor) on Sep 29, 2012 at 09:22 UTC | |
by BrowserUk (Patriarch) on Sep 29, 2012 at 09:41 UTC |