Select Code to Download

#!/usr/bin/perl -w
print "What is input file name?: ";
...
@>>> @<<<<<<<<<<<<<<<<<<< @> @> @>>>>>  @< @< @>>>> @  @<<<<<<<<     
$mag[1], $obid, $rah3, $ram2, $ras2, $hh2, $mm2, $ss2, $cfo, $status, 
.