Select Code to Download

kschwind@yzerman:~/src/local/j.random> diff red.pl blue.pl
1,2c1,2
...
<       make_color ("red", $_+2);
---
>       make_color ("blue", $_-2);

my smartish_sub {
 my ($colour) = @_;
...

# rest of code is written to use the hash references keyed on the colo
+ur, much like moritz described
...