diff options
| author | H.Merijn Brand <h.m.brand@xs4all.nl> | 2011-04-26 17:00:10 +0200 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2011-04-26 17:00:10 +0200 |
| commit | 40bbb70774f8fe1bca0339b5e5ed4d4ced3cceb3 (patch) | |
| tree | e4bd54ec58b73fa361ba0dc2965c0619b6ecf751 | |
| parent | d2c16ee1b038fb2c9cca1c0dc9e1d65c01c8063b (diff) | |
| download | perl-40bbb70774f8fe1bca0339b5e5ed4d4ced3cceb3.tar.gz | |
TomC change with a twist
| -rw-r--r-- | pod/perlop.pod | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/pod/perlop.pod b/pod/perlop.pod index 3120634f2f..c97c331681 100644 --- a/pod/perlop.pod +++ b/pod/perlop.pod @@ -1786,11 +1786,11 @@ when the program is done: The STDIN filehandle used by the command is inherited from Perl's STDIN. For example: - open BLAM, "blam" || die "Can't open: $!"; - open STDIN, "<&BLAM"; - print `sort`; + open SPLAT, "stuff" or die "can't open stuff: $!"; + open STDIN, "<&SPLAT" or die "can't dupe SPLAT: $!"; + print STDOUT `sort`; -will print the sorted contents of the file "blam". +will print the sorted contents of the file named F<"stuff">. Using single-quote as a delimiter protects the command from Perl's double-quote interpolation, passing it on to the shell instead: |