Update archive.pm

added a return value