xref: /plan9/rc/bin/ape/cat (revision 43751f27fa93b002d5e921851faf5da5cbdcb417)
1*43751f27SDavid du Colombier#!/bin/rc
2*43751f27SDavid du Colombier
3*43751f27SDavid du Colombierrfork e
4*43751f27SDavid du Colombier
5*43751f27SDavid du Colombierfiles=()
6*43751f27SDavid du Colombierwhile(! ~ $#* 0){
7*43751f27SDavid du Colombier	switch($1){
8*43751f27SDavid du Colombier	case -
9*43751f27SDavid du Colombier		files=($files /fd/0)
10*43751f27SDavid du Colombier	case -*
11*43751f27SDavid du Colombier		;
12*43751f27SDavid du Colombier	case *
13*43751f27SDavid du Colombier		files=($files $1)
14*43751f27SDavid du Colombier	}
15*43751f27SDavid du Colombier	shift
16*43751f27SDavid du Colombier}
17*43751f27SDavid du Colombier
18*43751f27SDavid du Colombierexec /$cputype/bin/cat $files
19