summaryrefslogtreecommitdiffstats
path: root/HAMM.pl
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2012-10-24 23:18:13 -0500
committerJesse Luehrs <doy@tozt.net>2012-10-24 23:18:57 -0500
commitd6966208224bb37ca532519a50849c686808582b (patch)
tree2e32f4d55bc11cbc9d9ef0606f2144bfe8ce2ea8 /HAMM.pl
parent8df97a656543017b5485276bdfef3961fa463486 (diff)
downloadrosalind-d6966208224bb37ca532519a50849c686808582b.tar.gz
rosalind-d6966208224bb37ca532519a50849c686808582b.zip
forgot to commit these
Diffstat (limited to 'HAMM.pl')
-rw-r--r--HAMM.pl8
1 files changed, 8 insertions, 0 deletions
diff --git a/HAMM.pl b/HAMM.pl
new file mode 100644
index 0000000..0debb4a
--- /dev/null
+++ b/HAMM.pl
@@ -0,0 +1,8 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use 5.016;
+
+chomp(my $line1 = <>);
+chomp(my $line2 = <>);
+say length(($line1 ^ $line2) =~ s/\x00//gr);