Re^3: use deprecated;

Actually, you don't even need to check whether the function exists. If you take a reference to a named but undefined function, it magically works once that function is defined. Perl is devious that way.

#!/usr/bin/perl

$_ = \&x;
*x = sub { print "Oh my\n" };
$_->();
[download]

This actually prints "Oh my".

Makeshifts last the longest.

Comment on Re^3: use deprecated; Download Code

Replies are listed 'Best First'.
Re^4: use deprecated; by adrianh (Chancellor) on Dec 03, 2003 at 01:21 UTC
Actually, you don't even need to check whether the function exists. If you take a reference to a named but undefined function, it magically works once that function is defined. Perl is devious that way. You're quite correct - I'm an idiot. In fact, I'm an idiot on two counts. My AUTOLOAD comment is equally bogus. Since everything is happening at INIT time the AUTOLOAD subroutine will already be defined. I restate my "sneaky" comment. Very nice :-)	[reply]

Replies are listed 'Best First'.

Re^4: use deprecated;
by adrianh (Chancellor) on Dec 03, 2003 at 01:21 UTC

Actually, you don't even need to check whether the function exists. If you take a reference to a named but undefined function, it magically works once that function is defined. Perl is devious that way.

You're quite correct - I'm an idiot.

In fact, I'm an idiot on two counts. My AUTOLOAD comment is equally bogus. Since everything is happening at INIT time the AUTOLOAD subroutine will already be defined.

I restate my "sneaky" comment. Very nice :-)

[reply]