Mega Code Archive

 

Categories / Perl / Language Basics

 

Using eq in statement

#!/usr/bin/perl -w use strict; my $password = "foxtrot"; print "Enter the password: "; my $guess = <STDIN>; chomp $guess; if ($password eq $guess) {     print "Pass, friend.\n"; }