Perl Poetry
open(LIFE,"life");
@mind=<LIFE>;
close LIFE;
unlink "life";
while($day=pop @mind)
{undef $day}
[via Charles Miller]
This is a single archived entry from Stefan Tilkov’s blog. For more up-to-date content, check out my author page at INNOQ, which has more information about me and also contains a list of published talks, podcasts, and articles. Or you can check out the full archive.
open(LIFE,"life");
@mind=<LIFE>;
close LIFE;
unlink "life";
while($day=pop @mind)
{undef $day}
[via Charles Miller]
:-)
Surprisingly, I haven’t grown to hate my own sole attempt ever.
Beautiful!