How to use BEGIN and END in Perl language
Editor to share with you how to use BEGIN and END in the Perl language, I believe most people do not know much about it, so share this article for your reference, I hope you can learn a lot after reading this article, let's go to know it!
Analysis of the usage of BEGIN and END in Perl language
The Perl language provides two keywords: BEGIN,END. They can contain a set of scripts for pre-or post-run execution of the program body, doesn't it sound awkward? Let's take a look at three examples.
* examples: the simplest and most direct! #! / usr/bin/Perl
BEGIN {print "inBEGINmodule!\ n";} die "exitPerlprogram!\ n"; END {print "inENDmodule!\ n";}
Copy the result of code execution:
InBEGINmodule!
ExitPerlprogram!
InENDmodule!
Is it easy to understand copying code?!
Second example: the main program body is placed in front of BEGIN/END; #! / usr/bin/Perl
Die "exitPerlprogram!\ n"; BEGIN {print "inBEGINmodule!\ n";} END {print "inENDmodule!\ n";}
Copy the code result:
InBEGINmodule!
ExitPerlprogram!
InENDmodule!
Copy code *, I'm sure everyone can think of: #! / usr/bin/Perl
BEGIN {print "inBEGINmodule!\ n";} END {print "inENDmodule!\ n";} die "exitPerlprogram!\ n"
The result of copying the code is still the same, so I won't post it here.
The above is all the content of the article "how to use BEGIN and END in Perl language". Thank you for reading! I believe we all have a certain understanding, hope to share the content to help you, if you want to learn more knowledge, welcome to follow the industry information channel!