Select Code to Download

    498     $word = qw("$word") if ($word =~ /\s/);

     $word = qq("$word") if ($word =~ /\s/);

    534     print <<ENDHELP;
    535 Hellow theres..
...
    546 random_bg.pl --rotate --delay 2
    547 
    548 If you give it words in @ARGV, it will continually show images

    210     open(TOPIC, ">$topic_file") or die "can't open $topic_file
+";

...
    236         open(IDFILE, $id_file);

    354     open FILE, ">$file" or &debug("can't open $file\n") and re
+turn 0;