Select Code to Download

#!/usr/bin/perl

...
print "blurple's blue is $blurple->{blue}\n";
print "blurple's blue is " . $blurple->blue ."\n";  # kaboom, no such 
+method