Skip to content

Instantly share code, notes, and snippets.

@azizshamim

azizshamim/regex_testing_perl

Created October 4, 2010 22:02
Show Gist options
  • Save azizshamim/610538 to your computer and use it in GitHub Desktop.
Save azizshamim/610538 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
regex_testing_perl
#!/usr/bin/perl -w
# IN PERL
use strict;
my $string = "welcome is the new welcome!";
$string =~ m/welcome!?/;
print 'In perl, the index of the match is: '.length($`)."\n";
$ In perl, the index of the match is: 0
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment