Help for this page

Select Code to Download


  1. or download this
    if ($item =~ /_0828900840_.*D602BG/)
  2. or download this
    my @contents = <$folder/*_0828900840_*D602BG>;
  3. or download this
    use File::Find::Rule qw/rule/;
my @files = rule->file->name(qr/_0828900840_.*D602BG/)
    ->maxdepth(1)->in(@folders);