find2perl /some/directory -name '*.gz' -exec gunzip {} \;