Select Code to Download

foreach my $line (@data) {
    print "$line\015\012"
}

-- 
Joost       downtime n. The period during which a system
            is error-free and immune from user input.