foreach my $file (glob('*.dat')) { process_data($file); }