Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

Re: Modules of Formats

by broquaint (Abbot)
on Oct 01, 2002 at 11:00 UTC ( #201967=note: print w/replies, xml ) Need Help??

in reply to Modules of Formats

I think the only real problem that you might encounter is copying the actual formats about. The problem is that there's no way of directly copying them unlike the other data types e.g
format foo = . { package mypkg; *form_foo = *main::foo; *form_ref = *form_foo{FORMAT}; } use Devel::Peek; Dump(*main::foo); Dump(*mypkg::form_foo); Dump(*mypkg::form_ref); __output__ SV = PVGV(0x80f9c78) at 0x8100de8 ... FORM = 0x80fd4e4 SV = PVGV(0x80f9dc0) at 0x8100e24 ... FORM = 0x80fd4e4 SV = PVGV(0x8101820) at 0x8100e3c ... FORM = 0x0
So you'll have to end up exporting entire globs into the given packages, which isn't ideal.


update: changed FORM to FORMAT

Replies are listed 'Best First'.
Re^2: Modules of Formats
by Anonymous Monk on Nov 11, 2012 at 14:27 UTC

    In the year 2012-11-11 with the perl v5.12.2/v5.14.1 it does work

    $ perl 2>&1 |grep FORM FORM = 0x99aa4c FORM = 0x99aa4c FORM = 0x99aa4c

    Still doesn't quite work in v5.8.9

    FORM = 0x182fa08 FORM = 0x182fa08 FORM = 0x0

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://201967]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (4)
As of 2021-04-14 06:07 GMT
Find Nodes?
    Voting Booth?

    No recent polls found