#! /usr/local2/mosaic/bin/perl if (@ARGV[0] eq "sparagmos") { print "yes"; } else { print "no"; }