I've been working on a small perl script to generate random asscii characters and fill the screen. So far I've used this as a screensaver, to generate garbage test files, and to print out and use as wrapping paper.

The Code:

#!/usr/bin/perl
# simulated snow
for (;;) {
my $r = int(rand(93)+33);
print chr($r);
}

Nothing too fancy going on this time, but thought its worth a mention as I've been having a lot of fun with it because of its simplicity and interesting aesthetic appeal.

I've also made this video of the script running in a terminal while playing some of the music I work on under the alias Cheesy Nirvosa as mood music behind it.