if ( $file =~ /.*\.bz2/ ) {
...
   } elsif ( $file =~ /.*\.gz/ ) {