Perl code by proch - 6 lines - bioinformatics

Link:

proch - Perl, pasted on Nov 17:

# Perl IF shortcut
$varA = 13;
$varB = 4;
$valid =  ($varA == $varB ? 'valid' : 'invalid');

print "Result: $valid\n";

Output:

1	Result: invalid