Statement Perl

#!//usr/bin/perl
ATTEMPT: {
   print "Yes/No? ";
   chomp($answer = );
   unless ($answer eq "yes"){
      redo ATTEMPT ;
   }
}