home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #18 / NN_1992_18.iso / spool / comp / lang / perl / 5416 < prev    next >
Encoding:
Text File  |  1992-08-21  |  1.5 KB  |  47 lines

  1. Newsgroups: comp.lang.perl
  2. Path: sparky!uunet!zaphod.mps.ohio-state.edu!cs.utexas.edu!convex!convex!tchrist
  3. From: Tom Christiansen <tchrist@convex.COM>
  4. Subject: Re: Problems with "tee"
  5. Originator: tchrist@pixel.convex.com
  6. Sender: usenet@news.eng.convex.com (news access account)
  7. Message-ID: <1992Aug21.173435.28739@news.eng.convex.com>
  8. Date: Fri, 21 Aug 1992 17:34:35 GMT
  9. Distribution: usa
  10. Reply-To: tchrist@convex.COM (Tom Christiansen)
  11. References: <none> <1992Aug21.172813.13174@odin.corp.sgi.com>
  12. Nntp-Posting-Host: pixel.convex.com
  13. Organization: Convex Computer Corporation, Colorado Springs, CO
  14. X-Disclaimer: This message was written by a user at CONVEX Computer
  15.               Corp. The opinions expressed are those of the user and
  16.               not necessarily those of CONVEX.
  17. Lines: 28
  18.  
  19. From the keyboard of rodman@pkr.asd.sgi.com (Paul Rodman):
  20. :
  21. :I'm having a problem with the following use of "/bin/tee" within 
  22. :a open statement. 
  23. :
  24. :This is the sampleprogram:
  25. :---------------------------------------------------------
  26. :#!/usr/local/bin/perl
  27. :
  28. :open (FOO, "| tee >foobaz");
  29. :print FOO "This is a test of tee with perl\n";
  30. :close FOO;
  31. :
  32. :exit;
  33. :---------------------------------------------------------
  34. :
  35. :When the program is run, the file is created correctly, but nothing appears
  36. :on STDOUT. From the manual this is not what I would expect.
  37.  
  38. But you've redirected stdout into foobaz!  Why would you expect it
  39. on your terminal? 
  40.  
  41. --tom
  42. -- 
  43.     Tom Christiansen      tchrist@convex.com      convex!tchrist
  44.  
  45.     OK, enough hype.
  46.             --Larry Wall in the perl man page 
  47.