HowTo Find Out Perl Version

How do I find out Perl version by running a cgi script from a webbrowser? How do I find out Perl version from a command prompt under Windows OR Linux / UNIX OR Apple MAC OS X operating systems?

Perl is acronym for Practical Extraction and Report Language. It is a general-purpose programming language invented in 1987 by Larry Wall. Originally developed for text manipulation. Perl has become extremely popular and is now used for a wide range of tasks, including web development and interface design.

Find Perl Version From a Linux / Unix / BSD / OS X Shell Prompt

If you have access to a shell prompt (UNIX/Linux) type the following command to find out perl version:
$ perl -v
Sample outputs:

This is perl, v5.10.1 (*) built for x86_64-linux-gnu-thread-multi(with 53 registered patches, see perl -V for more detail)

Copyright 1987-2009, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on this system using "man perl" or "perldoc perl".  If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.

You can also type above command under Windows / Mac OS X by opening terminal.

Find Perl Version Using a CGI Script

If your web hosting provider don’t provide access to a shell, use the following perl program to find out perl version:

Short version that avoid starting a new process (see below in comments):

#!/usr/bin/perl
$command= $];
$title = "Perl Version";
 
print "Content-type: text/html\n\n";
print "<html><head><title>$title</title></head><body>";
 
print "<h1>$title</h1>\n";
print "Perl version : ".$command;

source code – version.pl (download link)

The following code provides a little bit more information:

#!/usr/bin/perl
# Available under BSD License.
# See url http://www.cyberciti.biz/faq/how-can-i-find-out-perl-version/
$command=`perl -v`;
$title = "Perl Version";
 
print "Content-type: text/html\n\n";
print "<html><head><title>$title</title></head><body>";
 
print "<h1>$title</h1>\n";
 
print '&lt;pre>';
print $command;
print '&lt;/pre>';
 
print "</body></html>";

Sample outputs:

Find Perl Version Command / CGI-BIN Script

Upload script to your cgi-bin directory and execute script by typing url http://mydomain.com/cgi-bin/version.pl

Posted by: Vivek Gite

The author is the creator of nixCraft and a seasoned sysadmin, DevOps engineer, and a trainer for the Linux operating system/Unix shell scripting. Get the latest tutorials on SysAdmin, Linux/Unix and open source topics via RSS/XML feed or weekly email newsletter.

Your support makes a big difference:

I have a small favor to ask. More people are reading the nixCraft. Many of you block advertising which is your right, and advertising revenues are not sufficient to cover my operating costs. So you can see why I need to ask for your help. The nixCraft takes a lot of my time and hard work to produce. If everyone who reads nixCraft, who likes it, helps fund it, my future would be more secure. You can donate as little as $1 to support nixCraft:

4 comment

It is overkill to run a whole new process to find out the version, just read about Perl’s builtin variables in PERLVAR

In the code above change

$command=`perl -v`;
to
$command= $]

Ou pour la version type v5.10.0 :
$command = $^V;
http://perl.enstimac.fr/DocFr/perlvar.html

Or in versions of perl > v5.6 you can use the Version object variable $^V.
$command = sprintf “v%vd”, $^V ; # v5.8.9

Please do not tell people to write crappy Perl anymore. Seriously. People write enough crappy Perl as it is.

I mean, what’s this “$command = $]” garbage? It’s *already a variable*. You don’t need to tell people to copy it into another (badly named) variable (badly name because it’s NOT a “command”). And what’s the “$title” variable for? What makes you think you’d need a variable for something that’s used only once? Or the multiple calls to print, one per line?

It’s bad coding habits like this that get people started writing rubbish, inefficient Perl scripts which ultimately lead to pointy-haired managers thinking Perl is inefficient and inexplicably believing that Rails scales better or that Java is a streamlined solution. CUT. IT. OUT.

And never ever ever ever ever, no matter how innocuous it looks, ever tell people to run a CGI script that doesn’t use strict. Seriously. FFS.

#!/usr/bin/perl
use strict;
use CGI();

print <<"EOF";
@{[CGI::header]}


  
    Perl Version
  
  
    
      Perl Version
      $^V
    
  

EOF

Dave says:
March 17, 2008 at 12:42 pm
It is overkill to run a whole new process to find out the version, just read about Perl’s builtin variables in PERLVAR
In the code above change
$command=`perl -v`;
to
$command= $]
Tanguy says:
January 2, 2010 at 1:20 am
Ou pour la version type v5.10.0 :
$command = $^V;
http://perl.enstimac.fr/DocFr/perlvar.html
Alister says:
April 13, 2010 at 11:54 pm
Or in versions of perl > v5.6 you can use the Version object variable $^V.
$command = sprintf “v%vd”, $^V ; # v5.8.9
Dodger says:
November 9, 2015 at 3:40 pm
Please do not tell people to write crappy Perl anymore. Seriously. People write enough crappy Perl as it is.
I mean, what’s this “$command = $]” garbage? It’s *already a variable*. You don’t need to tell people to copy it into another (badly named) variable (badly name because it’s NOT a “command”). And what’s the “$title” variable for? What makes you think you’d need a variable for something that’s used only once? Or the multiple calls to print, one per line?
It’s bad coding habits like this that get people started writing rubbish, inefficient Perl scripts which ultimately lead to pointy-haired managers thinking Perl is inefficient and inexplicably believing that Rails scales better or that Java is a streamlined solution. CUT. IT. OUT.
And never ever ever ever ever, no matter how innocuous it looks, ever tell people to run a CGI script that doesn’t use strict. Seriously. FFS.
```
#!/usr/bin/perl
use strict;
use CGI();

print <<"EOF";
@{[CGI::header]}


  
    Perl Version
  
  
    
      Perl Version
      $^V
    
  

EOF
```

Still, have a question? Get help on our forum!

Adblock detected 😱