Select Code to Download

while(read (TEST, $stuff, 1)) {

$text .= $stuff;

print $text;