Provide the syntax to create your own custom Perl modules that lends itself to b

Question

Provide the syntax to create your own custom Perl modules that lends itself to being reused. Because the company is focused on managing servers, you might consider a module based on the following examples, but you are free to create your own: Executes system commands to retrieve system metrics like CPU utilization using a Perl Module. Reads information from a flat file and then inserts into a database using a Perl Module Connects to a database and retrieves reporting information using a Perl Module.

Explanation / Answer

You have to use package, for declaring modules like below

---contents of arthemetic.pm---file

package Arthemetic::Operations

use strict;

use warnings;

use Exporter qw(import);

our @EXPORT_OK = qw(subtract divide);

sub subtract {

my ($x, $y) = @_;

return $x - $y;

}

sub divide{

my ($x, $y) = @_;

return $x / $y;

}

1;

Define the functions in that file like above and use the package in required file like below.

#!/usr/bin/perl

use strict;

use warnings;

use Arthemetic::Operations qw(subtract);

print subtract(19, 23);

Related Questions

Navigate

• Browse (All)
• Browse P
• Subjects

Integrity-first tutoring: explanations and feedback only — we do not complete graded work. Learn more.