This section provides a tutorial example on how to use do() function to include script code from another file into the current script file.
As mentioned in the previous section, do() function can be used to include script code
from another file into the current script file.
To try this out, I wrote the following file, MyDoLib.inc, for other script file to include:
#- MyDoLic.inc
#- Copyright (c) 1995 by Dr. Herong Yang, http://www.herongyang.com/
#
$author = "Herong Yang";
print("Printing from MyDoLib.inc...\n");
sub myDoSub {
print("Printing from myDoSub()...\n");
}
1;
Here is tutorial example of how to use do() function to include script code in MyDoLib.inc:
#- IncDoTest.pl
#- Copyright (c) 1995 by Dr. Herong Yang, http://www.herongyang.com/
#
do("MyDoLib.inc");
print("Printing from IncDoTest.pl...\n");
print("Author = $author\n");
&myDoSub();
exit;
If you run this script, you will get:
Printing from MyDoLib.inc...
Printing from IncDoTest.pl...
Author = Herong Yang
Printing from myDoSub()...