a) It's often useful to know what name your script has. For example:

my $input_file  = shift @ARGV;
my $output_file = shift @ARGV;

die "Usage: $0 INPUT OUTPUT\n"
  unless defined $input_file && defined $output_file;

[download]

OK, you could replace $0 by hard-coding your script's filename, but what if somebody goes and renames your script - then your helpful error message is not so helpful anymore.

jethro also mentions scripts that do different things depending on what they're named. (And you'd typically give the script multiple names using symbolic links on Unix-like filesystems.) lwp-request is a commonly installed example of a script that does precisely that.

Lastly, on some operating systems it is possible to assign to $0. That is, you can do:

$0 = "blah";

[download]

And when people look at a list of processes running on the system (e.g. the top or ps commands on Linux) they'll see "blah" instead of the real name of the script. This is occasionally useful. For example, you have a script "http-server.pl" which opens up an HTTP server on a random TCP port. Then you just do:

$0 = "http-server.pl [port $port]";

[download]

And then the port it's serving on is shown in top and ps, which will be useful if you're running several HTTP servers at once, and need to check how much memory they are each consuming.

b) special variables, like $0 are pre-declared. You don't need to declare them.

c) Perl doesn't differentiate between numeric and other scalar values (e.g. strings) unless it really has to. Strings that don't look like a number are treated as "0" if used in a numeric context.

Thus, usually $0 will equal 0 if used in a numeric context. However, try renaming your script to "4count.pl" and you'll notice that its behaviour changes.

In reply to Re: Curious about a quirk with the special variable, $0 by tobyink
in thread Curious about a quirk with the special variable, $0 by mrdurtal

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.