Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re^2: Simple question about Inside-Out objects

by blazar (Canon)
on Mar 13, 2007 at 20:10 UTC ( #604672=note: print w/replies, xml ) Need Help??


in reply to Re: Simple question about Inside-Out objects
in thread Simple question about Inside-Out objects

refaddr() is used to be entirely agnostic about the bless status of an object.

Speaking of which (and I'm replying to you but ideally to all those who kindly answered my question, whom I thank), I was thinking that perhaps it would be nice if standard ref, just like so many functions, returned something different in list context, i.e. something like: REF, ADDR, BLESSED, where

  • REF would be ref()'s current output if the reference is not blessed, and if it is then the same as if it were not,
  • ADDR the same as refaddr()'s and
  • BLESSED the package the reference is blessed in, if it is, or undef otherwise.

But I suppose that such a beast would risk of breaking too much existing code...

Replies are listed 'Best First'.
Re^3: Simple question about Inside-Out objects
by diotalevi (Canon) on Mar 14, 2007 at 04:44 UTC

    Interestingly enough... UNIVERSAL::ref would allow you to override ref for some objects. There's no such thing as ref() in list context right now though.

    ⠤⠤ ⠙⠊⠕⠞⠁⠇⠑⠧⠊

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://604672]
help
Chatterbox?
[Lady_Aleena]: Discipulus, do glob recurse?
[Lady_Aleena]: s/do/does/;
LanX wants to be fired
[Discipulus]: i fear no
[Discipulus]: i invented also 'gired'
[Lady_Aleena]: Discipulus, then that is a problem. I wanted to find total seconds of my entire .mp3 collection to do some math on it to see how many days of continuous music i have.
[LanX]: darn. .. I wanted to see Marine and Melonchon go to next round, just for fun xD
[Discipulus]: LA use Perl: traversing a dir tree is simple; foreach file mp3 $sec+= use Mp3::Info
[Lady_Aleena]: Discipulus, I was able to get the sum of the seconds on the command line using awk. Then I ran the result through a perl script and got the result. It came bach with 4 days, 9 hours, 56 minutes, 43 seconds.

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (10)
As of 2017-04-23 20:28 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I'm a fool:











    Results (432 votes). Check out past polls.