#!/usr/bin/perl -w
use strict;
$|++;


while(1)
{
    chomp( my $i = <STDIN> );
    if( $i eq 'yes' ) { print "Yes entered for system.\n"; last }
    if( $i eq 'no' ) { print "No entered for system.\n"; last }
}