eghdam,

if you know that the 'pvid' is always 32 characters then:

   my $pvid = "00c1be9a467335ce0000000000000000";
   my $newpvid = substr( $pvid, 0, 16 );
   print "\$newpvid: $newpvid\n";
[download]

but also reading some more documentation wouldn't hurt!

Regards...Ed