Select Code to Download

$exten=|\.txt|\.doc|\.xml

$exten = '|\.txt|\.doc|\.xml';

my $exten = '|\.txt|\.doc|\.xml';

...
  print /$exten/ ? "match" : "no match";
  print "\n";
}

foo.txt: match
foo.csv: match
foo.xml: match

my $exten = '\.txt|\.doc|\.xml';

...
  print /$exten/ ? "match" : "no match";
  print "\n";
}

foo.txt: match
foo.csv: no match
foo.xml: match