Select Code to Download

open($test, "<test.txt");
if (!$test) {
...
} else {
   #use $test to print something
}

open($test, "<test.txt") || die("$!\n");