if (@input eq 'q') {

##</code><code>##

@foo = ('Bob', 'Tim', 'Bongo - The Jungle Avenger');

if ($foo[0] eq 'Bob') { #The $ indicates a single element
                        #and [0] indicates which one
    print "Everything has gone as planned";
}