Select Code to Download

Select or download this

$ perl -v | grep '^This is'
This is perl 5, version 30, subversion 0 (v5.30.0) built for x86_64-li
+nux-thread-multi

Select or download this

printf(
    "This is perl 5, version %d, subversion %d (v5.%d.%d), built for %
+s\n",
...
    perlmajor, perlminor,
    perlarch
);

Select or download this

            PerlIO_printf(PIO_stdout,
                "\nThis is perl "       STRINGIFY(PERL_REVISION)
...
                ", subversion "         STRINGIFY(PERL_SUBVERSION)
                " (%" SVf ") built for "        ARCHNAME, SVfARG(level
+)
                );

Select or download this

            PerlIO_printf(PerlIO_stdout(),
               "\nThis is perl, %"SVf
               " built for " ARCHNAME,
               level);

Select or download this

500 - Internal Server Error


Malformed UTF-8 character (fatal) at /var/www/git/gitweb.cgi line 1601
+, <$fd> line 107.

Select or download this

printf("\nThis is perl, version %s\n\n",patchlevel);