Select Code to Download

open FILE, "$file" or die "$!";

...
  print $1;
}
close FILE;

-----BEGIN GEEK CODE BLOCK-----
Version: 3.1
GPA/P/S d+ s++:+ a--- C++ UL++ P++>++++ L++ E W++ N o? K? w-- !O M- V?
+ PS++ PE- Y PGP- t 5- X+ R* tv-- b++ !DI D---(+) G e- h-- r++ y+++++>
++ 
------END GEEK CODE BLOCK-----