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

Re: The "right" way to make your script run with old versions of perl

by Corion (Patriarch)
on Jun 08, 2016 at 15:37 UTC ( #1165153=note: print w/replies, xml ) Need Help??

in reply to The "right" way to make your script run with old versions of perl

Personally, I like to write multiple modules that all implement the same API, like the following:

package Super::Cool::Perl5_006; # The most basic implementation
package Super::Cool::Perl5_008; use Super::Cool::Perl5_006; # First import all the stuff from 5_006 # and overwrite some of the newer stuff
package Super::Cool::Perl5_010; use Super::Cool::Perl5_008; # Not totally basic implementation

The package Super::Cool then basically loads the appropriate implementation package and exports the subroutines into the calling package.

This approach is great until you have a longer subroutine which has a common setup case and then one (or more) special cases after the common setup. My approach would then move the special handling into a separate subroutine, which makes the code more disjointed as the logic is then spread out over more subroutines. The alternative would be to copy and rewrite the subroutine for each Perl version, which carries its own hazards.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (7)
As of 2022-05-26 08:37 GMT
Find Nodes?
    Voting Booth?
    Do you prefer to work remotely?

    Results (93 votes). Check out past polls.