Select Code to Download

open DATA, "/usr/bin/cvs @ARGV |" or die "Couldn't execute program: $!
+";

    while ( defined( my $line = <DATA> ) ) {

        chomp($line);
        print "$line\n";
    }
close DATA;