in reply to User input check 'Do until' loop

First, Perl in case-sensitive, i.e. Do is not do.

Then, in your if/elsif conditions, you'd need to repeat the "$response eq" part

if ($response eq 'yes' || $response eq 'Yes' || $response eq 'YES' + || $response eq 'y') {

or use a regex match such as

if ($response =~ /^y(?:es)?$/i) {

Replies are listed 'Best First'.
Re^2: User input check 'Do until' loop
by Ahten (Initiate) on Mar 13, 2012 at 13:04 UTC
    Ahh wow, what a ridiculous fix, alls working fine now, thank you :)