Select Code to Download

> perl -w 1.pl
Unquoted string "colored" may clash with future reserved word at tmp.p
+l line 2.
Name "main::colored" used only once: possible typo at tmp.pl line 2.
print() on unopened filehandle colored at tmp.pl line 2.

print colored(['red'], "test");