Pall Thayer
Since the beginning
Works in Greenwich, Connecticut United States of America

PORTFOLIO (10)
BIO
Pall Thayer is an artist.

http://pallthayer.dyndns.org
Discussions (769) Opportunities (2) Events (4) Jobs (0)
DISCUSSION

Self-Portrait Randomizer


This page takes a random selection of 10 images that have been
generated by my "Self-Portrait"
(http://pallthayer.dyndns.org/self_portrait) project and "paints" them
together in a random fashion:
http://pallthayer.dyndns.org/self_portrait/randomsvg.php

DISCUSSION

Self Portrait


An auto-generated-real-time-self-portrait.
http://pallthayer.dyndns.org/self_portrait/
Pall Thayer

DISCUSSION

Ways of Seeing... code


The script isn't displaying correctly... the 'while' line is supposed to be the word 'while' followed by the less-than character, FILE, greater than character in parentheses, followed by an opening curly bracket.

DISCUSSION

Ways of Seeing... code


How to use:
Let's say you have a perl code called 'my_script.pl'
perl printer.pl my_script.pl
This generates a new file named my_script_printered.pl Run it with:
perl my_script_printered.pl
Will also work with php scripts, i.e. my_script.php
perl printer.pl my_script.php
php -f my_script_printered.php
#!/usr/bin/perl
$file = @ARGV[0];
open FILE, $file;
$file =~ s/\./_printered\./;
open NEWFILE, '>'.$file;
while(<FILE>){
       print NEWFILE $_;
       print NEWFILE 'print \''.$_.'\';';
}
close(NEWFILE);
close(FILE);

DISCUSSION

How to forget


http://pallit.lhi.is/microcodes/contr.php?code_id=58

#!/usr/bin/perl
$remember = "fixed in memory";
foreach $k(keys %main::){
$var = $k;
eval{$$var = undef;};
}
print $remember;