Conditional statements in Perl
Similar to the rest of the Perl language, we will have similarities with bash scripting and some completely new ways of implementing conditions. This will often work in our favor; thus, making the code more readable.
Replacing command line lists
First, we do not have the command line list logic, which we use in bash and we do not make use of the &&
and ||
. Instead of these rather weird looking symbols, the conditional logic for single statements in Perl is written in the following manner:
exit(2) if scalar @ARGV < 1; print("Hello $ARGV[0]\n") unless scalar @ARGV == 0;
In the first example, we exit with an error code of 2
, if we have supplied less than one command-line argument. The bash equivalent to this will be:
[ $# -lt 1 ] && exit 2
In the second example, we will only print the hello
statement if we have supplied arguments. This will be written in bash, as shown in the following example:
[ $# -eq 0 ] || echo "Hello $1"
Personally...