Ja so auf anhieb würde ich sagen, benutze mal use strict; und use warnings; auf dass deine Variablen einen Gültigkeitsbereich erhalten und du Fehler jetzt und zukünftig immer schnell findest :)

Dann hast du das = als Vergleichsoperator verwendet. Das ist aber der Zuweisungsoperatur ($x = 5; # weise $x den Wert 5 zu). Gemeckert wird darüber nicht viel (glaube ich), weil du kein strict und warnings an hast. Um Zeichenketten zu vergleichen musst du den Operator eq benutzen (if( "abc" eq "abc" ) { ... }), ne prüft auf ungleichheit.
Bei Zahlen hingegen gibt es == und != als Vergleichsoperatoren.

Um dir zu merken, ob du etwas gefunden hast kannst du eine Variable my $gefunden = 0; vor der Schleife deklarieren, die du innerhalb deiner if-Abfragen auf 1 setzt, wenn du etwas findest. Wenn dann nämlihc nichts gefunden wird ist die immernoch 0 und du kannst das dann abfragen (mit if( $gefunden == 0) { .. }).

Grüße, pktm