use warnings::colored;
warn "warning";  # yellow
system "non-existant-command";  # red
say "test";  # none
eval { die "caught" };  # none
say $@;  # none
die "died";  # red