Regular Expression Perl

  1. Home
  2. Perl
  3. Regular Expression
  4. Match zero or one characters
$p = "This is a pattern test.";
if ($p =~ /(\w)?/){ print "$1\n"; }