Help for this page

Select Code to Download

Select or download this

#! /usr/bin/perl -w
use strict;
# 1144651
...
   $pvid = $1;
} 
print $pvid;