Select Code to Download

#!/usr/bin/perl

package TutorialConfig;
...

        return $self->{$key};
    }

    use TutorialConfig;

...
    print "The author's first name is ", 
             $tut->get('author.firstname'), 
             ".\n";