Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: Re-using/changing a class

by Crulx (Monk)
on Feb 10, 2001 at 16:42 UTC ( [id://57620]=note: print w/replies, xml ) Need Help??


in reply to Re-using/changing a class

Ahh, wisdom you seek. And some wisdom different from what you see here I can provide. You have a class Myclass yes?
use strict; package Myclass; sub foo { return 1; } 1;
Seeing the folly of your ways, you come to realize that the code must be
use strict; package Myclass; sub foo { return 42; } 1;
Search this program below for the answer
use strict; use Myclass; print "Foo is " . &Myclass::foo . "\n"; print "Modify the file and hit enter\n"; <STDIN>; do 'Myclass.pm'; print "Foo is " . &Myclass::foo . "\n";
And thus does "do". But note, that if we delete foo, the function remains in the symbol table, and thus stays. A more through approach would clobber the table elements from the package. Class variables are vulnerable as well. And use warnings will warn.

In your service,
---
crulx
crulx@iaxs.net

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others learning in the Monastery: (3)
As of 2024-04-20 01:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found