-son this invocation line tells Perl to search the command line for switches. Any switches that it finds are removed from
@ARGVand their correspondingly named scalar variables are set true.
For example if we invoked our program as
@ARGVis empty and within
$pis set true.