Help for this page
#!/usr/bin/perl ... 'FooHaHa, TX 76401' ] ); print $c->state;
package MyBaseClass; ... } 1;
package Address; ... } 1;