Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Nobody uses MSG_get_errno and wants useless calls to SIMIX_process_self
[simgrid.git] / tools / tesh / colorize.pl
1 #!/usr/bin/perl -w
2 use Term::ANSIColor qw{:constants};
3 $Term::ANSIColor::AUTORESET = 1;
4
5 while(<>){
6     if($_ =~ m/^(\d+\:\s)?[-]\s.*/){
7         print BOLD RED $_;
8     }elsif ($_ =~ m/^(\d+\:\s)?[+]\s.*/){
9         print BOLD GREEN $_;
10     }else{
11         print BOLD $_;
12     }
13 }
14
15