#!/bin/csh
# set pgm=($argv[*])

if( $argv[1] != "" ) then
     echo "push " $argv[*]
     set inp=($argv[*])
else
     echo -n "Enter list of files or wildcards to transfer: "
     set inp=($<)
endif

     dcp $inp bpa50/eohbdlc::"disk1:[eohbdlc.pvm.src_31]"
