Mini-Programm in Perl geschrieben, eine Frage

[perlnewbie]

Hallo!
Ich habe heute mal ein Programm in Perl geschrieben, was folgendes tun soll: Es soll zuerst fragen "Wie ist dein Name?". Nachdem man seinen Namen eingegeben hat, soll es "Hallo (name), wie geht's dir?" fragen. Soweit funktioniert es auch. Aber das ist noch nicht das ganze Programm. Denn je nachdem, ob man die Frage mit "gut" oder "schlecht" beantwortet, soll das Programm unterschiedlich Antworten.

Ich glaube sogar, dass es funktionieren würde, doch ich habe leider das Problem, dass wenn ich auf die zweite Frage "Hallo (name), wie geht's dir?" antworten möchte, sich das Programm schließt. Wie kann ich das verhindern?

Hier das Skript/Script:

#!/usr/bin/perl
use 5.010;
use warnings FATAL => 'all';

say "Wie ist Dein Name? ";
my $name = <STDIN>;
say "Hallo $name, wie geht's Dir?";
$antwort1 = "gut";
$antwort2 = "schlecht";
if ($antwort1)  {
   # say "schön zu hören";
}
  if ($antwort2)  {
   # say "warum?"
 }

Vielleicht könnt ihr mir ja helfen. Danke schon mal im Voraus.

L.G. perlnewbie :)