#!/usr/bin/perl use strict; print "Enter password: \n"; chomp( my $answer = <> ); die "Incorrect password.\n" if ( $answer eq 'password' ); # ... main program is here #
In reply to Re: Password question
by bichonfrise74
in thread Password question
by perl_seeker
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |