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";
In reply to Re: How to Print Underline Text in PERL.
by almut
in thread How to Print Underline Text in PERL.
by ungalnanban
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |