Skip to content

Instantly share code, notes, and snippets.

@sironekotoro

sironekotoro/triple_match.pl

Last active December 20, 2019 10:11
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save sironekotoro/1a64f69d2a65d32c4811ed1712ecc418 to your computer and use it in GitHub Desktop.
Save sironekotoro/1a64f69d2a65d32c4811ed1712ecc418 to your computer and use it in GitHub Desktop.
Download ZIP
triple match
Raw
triple_match.pl
use strict;
use warnings;
my $charA = 'A';
my $charB = 'B';
my $charC = 'C';
if ( $charA =~ 'A' && $charB =~ 'B' && $charC =~ 'C' ) {
print "match\n";
}
else{
print "not match\n";
}
my $num1 = 1;
my $num2 = 2;
my $num3 = 3;
if ( $num1 == 1 && $num2 == 2 && $num3 == 3 ) {
print "match\n";
}
else{
print "not match\n";
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment