I've inserted the ANSI code and it should display the whole output in another color correct? However it does not. What am I missing? Thanks.
#!/usr/bin/perl use Term::ANSIColor qw(:constants); print GREEN, open (FILE, "railcardata.txt"); while (<FILE>) { chomp; ($roadname, $roadnumber, $cartype, $interrr) = split(":"); write; } close (FILE); format STDOUT_TOP = ====================================================================== ROAD NAME ROAD NUMBER CAR TYPE INTERCHANGE RAILROAD ====================================================================== . format STDOUT = @<<<<<<<<<<<<< @<<<<<<<<<<<<<< @<<<<<<<<<<<<<< @<<<<<<<<<<< $roadname, $roadnumber, $cartype, $interrr . sleep 12;
In reply to Re^2: How to change the color of the text
by PilotinControl25
in thread How to change the color of the text
by PilotinControl25
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |