Help for this page

Select Code to Download


  1. or download this
    my $rin = "";
vec($rin, fileno(STDIN), 1) = 1;
...
if($isPiped){
 #Do the data processing from pipe
}
  2. or download this
    some-program|myprogram -parameters
  3. or download this
    my $rin = "";
sleep(5);
...
if($isPiped){
 #Do the data processing from pipe
}