Solaris prog4

#! /bin/csh
echo Enter a password
set password=$<

while ($password != "1234")
    echo $password is bad password
    echo Try again, Enter a password
    set password=$<
end

echo $password is good password