Select Code to Download

#!/usr/bin/env perl

...
    my ($string) = @_;
    return colored($string, 'yellow on_red');
}