#! /bin/csh
# $Header: glpq,v 1.1 88/01/15 13:04:09 simpson Rel $
# $Log:	glpq,v $
#Revision 1.1  88/01/15  13:04:09  simpson
#initial release
#
#Revision 0.1  87/12/11  18:30:57  simpson
#beta test
#
set printers=(sneezy dopey grumpy)
set lpqflags
while ($#argv > 0)
    switch ($1)
    # if the -P option or a job number is given, only use one printer
    case -P*:
	lpq $lpqflags $*
	exit
    case [0-9]*:
	lpq $lpqflags $*
	exit
    default:
	set lpqflags=($lpqflags $1)
	shift
	breaksw
    endsw
end
foreach i ($printers)
    echo ${i}:
    lpq -P$i $lpqflags
    echo ${i}l:
    lpq -P${i}l $lpqflags
end