On Fri, 21 Sep 2001, Paul Makepeace wrote:

> #!/usr/bin/perl
> sub yarn { "Once upon a time, @_. The End." }
> $SIG{__WARN__} = sub { warn yarn @_ };
> warn "there was an interview question";
>
> What is the output?
>
> (IQ stands for interview question :-)
>
> Paul
>
Once upon a time, there was an interview question at - line 4.
. The End. at - line 3.

Andy


Reply via email to