x' => 'application/vnd.openxmlformats-officedocument.spreadsheetml.sheet', 'json' => 'application/json', }; if ( $filename =~ m/\.([^.]+)\z/ ) { my $extension = lc( $1 );