Ignorere stdin hvis intet er angivet.

[Bjørn Bille Højte <sslug@sslug>]

Hej.

Så er det atter blevet den tid hvor jeg er løbet fast i et lille problem.
Sikkert et eller andet der er meget simpelt når man lige bliver ledt på
rette vej...

Jeg har et script, som skal tage standard input - hvis der er noget, men
ellers ignorere det.

Hurtigt eksempel:

test.pl:
#!/usr/bin/perl
#
while (<>) {
	print;
}


Hvis man f.eks. bruger ovenstående med

test.pl < /etc/printcap

Vil det fungere fornuftigt, men hvis man ikke angiver noget vil det vente
på at man skriver et eller andet.

Hvordan får man scriptet til at ignorere dette og bare hoppe uden om
læsningen af stdin hvis der ikke er angivet noget?


Med venlig hilsen
Bjørn Bille Højte
sslug@sslug