Help for this page

Select Code to Download

Select or download this

use Modern::Perl;

my %data = (
...
        say "$plex, $sample, $gt, $content";
    }
}

Select or download this

W30569, LB2241-RCC, G, T,T,C,CA,GT,T,GA,C,A,G,CT,T,T,CA,AG,TC,G,GA,C,T
+C,CT,AG,AG,C,GT,GA,G,GA,T
W30467, LB2241-RCC, T, T,T,C,CA,GT,T,GA,C,A,G,CT,T,T,CA,AG,TC,G,GA,C,T
+C,CT,AG,AG,C,GT,GA,G,GA,T