Re^6: How do I pretend a reference isn't a reference

in reply to Re^5: How do I pretend a reference isn't a reference
in thread How do I pretend a reference isn't a reference

Well, my original example was defining the array @days at compile time, because that's going to be more efficient than:


       sub day_of_week {
            my $self = shift;
            my @days = _('Mon'),_('Tues'),_('Wed'),_('Thurs'),_('Fri')
+,_('Sat'),_('Sun');
            return $days[ $self->{day_num} ];
       }
[download]

To give another example, I have about 3,000 lines of YAML config data, which gets loaded into a hash during initialisation. Some of that data will contain strings-to-be-translated, eg:


     status:
         a:   _('Active')
         i:   _('Inactive')
[download]

During init, I check all the scalar values in the config hash and, if they match the _('...') form, then I bless them into i18n::String. Doing this with tie wouldn't be feasible.

Clint

Comment on Re^6: How do I pretend a reference isn't a reference Select or Download Code

In Section Seekers of Perl Wisdom