open(STDIN,"<&".fileno($c)) or die;
  print STDERR "STDIN: ",<STDIN>;
  print STDERR "\$c: ",<$c>;

##</code><code>##

20040902 14:15:45 STDIN: 
20040902 14:15:45 $c:  fcl_userid=d4ants&fcl_password=hidden&referer=&fcl_login_submit=Login