-----BEGIN PGP SIGNED MESSAGE-----
Moin,
On 15-Jan-02 Piers Cawley tried to scribble about:
> Michael G Schwern <[EMAIL PROTECTED]> writes:
[Snip a lot]
> Let's see if I can come up with a simple counterexample that will show
> up the problem.
>
> #!perl
> my($compile_time, $start_time);
> BEGIN {$compile_time .= localtime(time)}
>
> # Later:
>
> print "Compiled at $compile_time\n";
> print "Started at $start_time\n";
>
> ...
>
> BEGIN {$start_time .= localtime(time)}
> __END__
>
> How do you intend to distinguish between those two BEGIN blocks, one
> of which must be run at script compile time, the other of which must
> be run at (for want of a better description) INIT time? And neither of
> which can be run twice (hence the .=).
>
> The only thing that can make that distinction is a human being. The
And how does the interpreter do this? Certainly not by prompting the user:
Run BEGIN blocks (y/n)? [y]
Just a silly question...;o)
Cheers,
Tels
- --
perl -MDev::Bollocks -e'print Dev::Bollocks->rand(),"\n"'
vitalistically unleash guinine experiences
http://bloodgate.com/perl My current Perl projects
PGP key available on http://bloodgate.com/tels.asc or via email
-----BEGIN PGP SIGNATURE-----
Version: 2.6.3i
Charset: latin1
iQEVAwUBPERfw3cLPEOTuEwVAQGJowf/SRAo1g1moUNX39RhOryFM3s1Jm2Kyohn
ZKyk36QGuPeWltUKIDiJBGpSNnDjBm/ObJRf/wf9SM6JWBUE30Qp5JhMd/sKTWmZ
9Ku2Ra4BgQGSEU4+gkSlQSFGjt6Qos6+gyrohOs8wAEAOhGRcLhAL6iRp7K6E5KJ
iaQ75F46bkZmb9mvfoXM6qbYsI8gWLlnVwP0/dlzylxHEYRD6zFubcciE1LTIt/2
HxYgNEg6/J1x/BQBs1JqZgT2zIj7mOZPICzBiVZ4Fp/2F9yiPWyltES9BgW17kJm
Tc80P7dAcTNKHqRVpAPDh+2WWZb/sKYBHIy8zdCKj0RH4JkKjltYgg==
=OjqE
-----END PGP SIGNATURE-----
