mirror of
https://github.com/super-linter/super-linter.git
synced 2024-11-25 02:01:02 -05:00
40 lines
1.4 KiB
Perl
40 lines
1.4 KiB
Perl
|
#!/usr/bin/perl
|
||
|
|
################################################################################
|
||
|
|
################################################################################
|
||
|
|
######### Script action @admiralAwkbar #########################################
|
||
|
|
################################################################################
|
||
|
|
|
||
|
|
#############
|
||
|
|
# Load Libs #
|
||
|
|
#############
|
||
|
|
use strict;
|
||
|
|
|
||
|
|
##################
|
||
|
|
#### GLOBALS: ####
|
||
|
|
##################
|
||
|
|
my $state = undef; # State to return to GHE
|
||
|
|
my $exitCode = undef # Code to exit with
|
||
|
|
my $description = "Here it is"; # Description of the build
|
||
|
|
|
||
|
|
###############
|
||
|
|
#### MAIN: ####
|
||
|
|
###############
|
||
|
|
Header(); # Basic print statements
|
||
|
|
AnotherOne();
|
||
|
|
Again();
|
||
|
|
|
||
|
|
#######################################################################
|
||
|
|
#################### SUB ROUTINES BELOW ONLY ##########################
|
||
|
|
#######################################################################
|
||
|
|
#######################################################################
|
||
|
|
#### SUB ROUTINE Header ###############################################
|
||
|
|
sub Header
|
||
|
|
{
|
||
|
|
print "-------------------------------------------------------------------\n";
|
||
|
|
print "State:\[$state\]\n";
|
||
|
|
print "ExitCode:\[$exitCode\]\n";
|
||
|
|
print "Description:\[$description\]\n";
|
||
|
|
print "What:[$here]\n";
|
||
|
|
print "-------------------------------------------------------------------\n";
|
||
|
|
}
|