Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re^3: Accessing a scalar value in another subroutine?

by Corion (Pope)
on Sep 23, 2012 at 21:44 UTC ( #995259=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Accessing a scalar value in another subroutine?
in thread Accessing a scalar value in another subroutine?

If you are hell-bent on doing that, and having doc-strings for your functions, the following style may be to your taste:

use vars %documentation; sub doc($$) { my ($for,$doc) = @_; $documentation{ $for } = $doc; }; doc('mysub1',<<'=cut'); =head2 C<< mysub1 >> This documents mysub1. An example: mysub1(); =cut sub mysub1 { ... }; doc('frobnicate',<<'=cut'); =head2 C<< frobnicate >> This documents frobnicate. An example: frobnicate(); =cut sub frobnicate { ... };

You will note from history that this style never caught on.

If you adhere to a strict documentation style, you may simply parse the POD and extract the function definitions from that. Using "docstrings" and parsing the module documentation are equivalent in that sense.


Comment on Re^3: Accessing a scalar value in another subroutine?
Download Code
Re^4: Accessing a scalar value in another subroutine?
by LanX (Canon) on Sep 23, 2012 at 21:51 UTC
    well far from being DRY... :)

    Cheers Rolf

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (11)
As of 2014-08-22 10:32 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (153 votes), past polls