Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: Reference assessment techniques and how they fail

by hipowls (Curate)
on Feb 17, 2008 at 00:25 UTC ( #668370=note: print w/replies, xml ) Need Help??

in reply to Reference assessment techniques and how they fail

Enjoyable article but you underestimate the freedom perl gives you to shoot yourself (or innocent bystanders) in the foot;-). You can, with some effort, declare methods in Package 0.

use strict; use warnings; use 5.010_000; my $package_0 = bless {}, '0'; { no strict qw(refs); *{'0::hello'} = sub { say 'Hello World!'; }; } say ref $package_0; $package_0->hello(); __END__ 0 Hello World!

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://668370]
[LanX]: before digging into deep debugging ... I have a strange UTF8 problem, probably it rings a bell:
[LanX]: two utf8 strings from different sources are base64 encoded, but after joining both the umlauts in teh second get deleted
[Corion]: LanX: You can't just join two base64 strings together
[LanX]: (not a high priority bug because I can use some HTML entities in the second string)
[Corion]: base64 is padded to a multiple of 4 chars (or something)
[LanX]: misunderstanding, I joined them before converting to base64
[Corion]: Also, I would be wary of encodings and try to make really sure that both input strings are UTF-8. Maybe join the input strings from one source together to see whether they decode as bad or not
[Corion]: LanX: Then the problem should persist without encoding to base64 too ;)

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (9)
As of 2017-01-16 13:51 GMT
Find Nodes?
    Voting Booth?
    Do you watch meteor showers?

    Results (150 votes). Check out past polls.