#!/usr/bin/perl
  $pdbfile = $ARGV[0];
  print "path=$ENV{PATH}\n";
  print "procheck $pdbfile 1.0\n";
  #system("procheck $pdbfile 1.0");