http://www.perlmonks.org?node_id=984097


in reply to needing to zip files in a series that begin with the same IP address

You need to escape the . like this: \.. At the end of your regex, you're matching everything left with the /.*/.