#!/usr/bin/perl
use warnings;

BEGIN {
        push @INC,"/usr/share/perl/5.10.1";
      }

use TERM::ANSIColor;
print color("red"), "hello world\n", color("reset");