We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Course Of The Month
Become a Premium Member and unlock a new, free course in leading technologies each month.
Solved
How to create a seperate helper function in Perl?
Posted on 2012-12-20
Hi,
I have a few Perl packages. In these packages, there is a piece of code that I repeat every time. Therefore, I would like to create a separate function (a separate function in a helperFunctions directory) and when I need that piece of code, I will call this function with certain inputs and return the output to the caller.
Example:
I want this code to be like this:
How can I do it?
Can you send me a basic hello world example?
the directory structure is like this:
The helperFunctions dir will be like this:
I have a few Perl packages. In these packages, there is a piece of code that I repeat every time. Therefore, I would like to create a separate function (a separate function in a helperFunctions directory) and when I need that piece of code, I will call this function with certain inputs and return the output to the caller.
Example:
package xxx::yyy;
use strict;
use warnings;
sub yyy{
some code-1
some repetitve code-1
some repetitve code-2
some repetitve code-3
some repetitve code-4
some repetitve code-5
some code-2
}
1;
I want this code to be like this:
package xxx::yyy;
use strict;
use warnings;
sub yyy{
some code-1
call helperFunction lineNumbers.pm here and return the output
some code-2
}
1;
How can I do it?
Can you send me a basic hello world example?
the directory structure is like this:
/dir1/yyy.pm
The helperFunctions dir will be like this:
/dir1/helperFunctions/lineNumbers.pm
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
2
4 Comments
you can try this:
#Add this to your package:
require '/dir1/helperFunctions/lin
#Call the subroutine as normal:
&helperFunction;
#Then in lineNumbers.pm add
#Add this to your package:
require '/dir1/helperFunctions/lin
#Call the subroutine as normal:
&helperFunction;
#Then in lineNumbers.pm add
sub helperFunction{
#Code here
}
1; #don't forget to have this!!!
I believe you can use "use" also:
http://perldoc.perl.org/functions/use.html
http://perldoc.perl.org/functions/use.html
Active 4 days ago
Using "use" is more standard. Generally, you'll write a module something like:
package MyFunctions;
require Exporter;
use base qw(Exporter);
@EXPORT = qw(helperFunction1);
sub helperFunction1 {
...
}
1;
use lib 'some-dir'; # only needed if MyFunctions is not in somewhere pointed to by @INC
use MyFunctions;
helperFunction1();
Featured Post
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
A year or so back I was asked to have a play with MongoDB; within half an hour I had downloaded (http://www.mongodb.org/downloads), installed and started the daemon, and had a console window open.
After an hour or two of playing at the command …
In the distant past (last year) I hacked together a little toy that would allow a couple of Manager types to query, preview, and extract data from a number of MongoDB instances, to their tool of choice: Excel (http://dilbert.com/strips/comic/2007-08…
Explain concepts important to validation of email addresses with regular expressions. Applies to most languages/tools that uses regular expressions.
Consider email address RFCs:
Look at HTML5 form input element (with type=email) regex pattern:
T…
Suggested Courses
Earn Certification
HTML5 Specialist - Certification
Free withPremium
Course of the Month7 days, 3 hours left to enroll
622 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.