Select Code to Download

#!/usr/bin/perl
use strict;
...
    print "$line\n";
}
close(FILE);

 [00m, [01;34m, [01;35m, [m]0;