@paths = map{$pwd.'/'.$_} (@paths);