Help for this page

Select Code to Download


  1. or download this
    @Files =( "filename=merilyn14.jpg.jpeg", "filename=...)

$file = "filename=merilyn14.jpg.jpeg"
  2. or download this
    foreach my $file (@Files)
      {
          if ($file =~ m/filename=(\d.*?)([a-zA-Z].*?)\.j/i)
  3. or download this
    foreach my $file (@Files)
      {
          if (/^filename=(\d.*?)([a-zA-Z].*?)\.j/)