in reply to How to Print Underline Text in PERL.
You could use print instead of system and echo:
print "\e[36;38mWELCOME\e[37m TO PERLMONKS\n";
And - if you need it more than once - you might want to put the respective ANSI escape sequences in variables, so it's easier to type and read:
my $UL = "\e[36;38m"; my $UE = "\e[37m"; print "${UL}WELCOME$UE TO PERLMONKS\n";
|
|---|