#!/usr/bin/perl

$arg = shift || die "usage: mpi_job_cancel id\n";

$US = $ENV{'ULTRASCAN'};
print `echo mpi_job_cancel $arg > $US/etc/us_gridpipe`;



