Vielleicht kannst Du ja eines der Archive::*-Module verwenden...

Oder Du kannst vielleicht mit open und einer Pipe arbeiten (siehe perldoc -f open)... Wenn in der Ausgabe das "wrong password" kommt, dann brichst Du ab...