# determine type
    # process {dir}
    # process {text1}
    # munge munge munge...

##</code><code>##

my @files = get_filenames( $data{$type}{dir}, $data{$type}{regex} );