#!/usr/bin/perl
use strict;
use warnings;
use FindBin;

my $VERSION = "1.0";

print STDERR "This is $0 version $VERSION located in $FindBin::Bin running as process $$\n";

##</code><code>##

ian@laptop2:~$ ./test.pl
This is ./test.pl version 1.0 located in /home/ian running as process 6119
ian@laptop2:~$ ./test.pl
This is ./test.pl version 1.0 located in /home/ian running as process 6120
ian@laptop2:~$ ./test.pl
This is ./test.pl version 1.0 located in /home/ian running as process 6121