Select Code to Download

#!/usr/bin/perl

...
                  
print $q->textarea( -name => "bar", -class => "inked" );
print "\n";

.inked {
 background: #E0E0F0;
 border-width: 1px;
 border-style: solid;
}