cvs commit: perlfaq perlfaq6.pod

cvsuser     02/06/16 21:44:13

  Modified:    .        perlfaq6.pod
  Log:
  re-wrapped a long line.  no big whoop
  
  Revision  Changes    Path
  1.13      +3 -3      perlfaq/perlfaq6.pod
  
  Index: perlfaq6.pod
  ===================================================================
  RCS file: /cvs/public/perlfaq/perlfaq6.pod,v
  retrieving revision 1.12
  retrieving revision 1.13
  diff -u -w -r1.12 -r1.13
  --- perlfaq6.pod	1 Jun 2002 22:31:09 -0000	1.12
  +++ perlfaq6.pod	17 Jun 2002 04:44:13 -0000	1.13
  @@ -1,6 +1,6 @@
   =head1 NAME
   
  -perlfaq6 - Regular Expressions ($Revision: 1.12 $, $Date: 2002/06/01 22:31:09 $)
  +perlfaq6 - Regular Expressions ($Revision: 1.13 $, $Date: 2002/06/17 04:44:13 $)
   
   =head1 DESCRIPTION
   
  @@ -675,8 +675,8 @@
   
   Here are a few ways, all painful, to deal with it:
   
  -   $martian =~ s/([A-Z][A-Z])/ $1 /g; # Make sure adjacent ``martian'' bytes
  -                                      # are no longer adjacent.
  +   $martian =~ s/([A-Z][A-Z])/ $1 /g; # Make sure adjacent ``martian''
  +                                      # bytes are no longer adjacent.
      print "found GX!\n" if $martian =~ /GX/;
   
   Or like this: