Select Code to Download

       my @days = _('Mon'),_('Tues'),_('Wed'),_('Thurs'),_('Fri'),_('S
+at'),_('Sun');
...
            return $days[ $self->{day_num} ];
       }

    package i18n::String;
...

    1;

     sub good {
...
         my %params = ref $_[0] ? %{shift @_} : @_;
     }

    { 
...
    }

    1;