topical media & game development

talk show tell print

basic-regex-26-NonDefaultDelimiters.pl / pl



  #!/usr/bin/perl -w
  use strict;
  print "This example uses delimiters other than the default /somePattern/.\n\n";
  my myTestString = "Hello world!";
  print "It worked using paired { and }\n\n" if myTestString =~ m{world};
  print "It worked using paired ! and !\n\n" if myTestString =~ m!world!;
  print "It worked using paired . and .\n\n" if myTestString =~ m.world.;


(C) Æliens 20/2/2008

You may not copy or print any of this material without explicit permission of the author or the publisher. In case of other copyright issues, contact the author.