summaryrefslogtreecommitdiff
path: root/pod/perlsyn.pod
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-02-15 18:25:05 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-02-15 18:25:05 +0000
commit73659bf1a819ac7d9f9fcae022ed8755e46824eb (patch)
tree19c2161a32d232f397694d968b60dc293a96fbae /pod/perlsyn.pod
parentb9582b6a1927c5927eaaf0fdf154d2cefbf4c002 (diff)
downloadperl-73659bf1a819ac7d9f9fcae022ed8755e46824eb.tar.gz
avoid accidental #line directives (from Rick Delaney
<rick@consumercontact.com>) p4raw-id: //depot/perl@5108
Diffstat (limited to 'pod/perlsyn.pod')
-rw-r--r--pod/perlsyn.pod2
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlsyn.pod b/pod/perlsyn.pod
index f07bdfeabf..7b9590e4de 100644
--- a/pod/perlsyn.pod
+++ b/pod/perlsyn.pod
@@ -593,7 +593,7 @@ this, one can control Perl's idea of filenames and line numbers in
error or warning messages (especially for strings that are processed
with C<eval()>). The syntax for this mechanism is the same as for most
C preprocessors: it matches the regular expression
-C</^#\s*line\s+(\d+)\s*(?:\s"([^"]*)")?/> with C<$1> being the line
+C</^#\s*line\s+(\d+)\s*(?:\s"([^"]+)")?\s*$/> with C<$1> being the line
number for the next line, and C<$2> being the optional filename
(specified within quotes).