my sequence is like that i want to extract the two 5 digits number using the split function .how i can do that scaffold_12147 protein_coding exon 32192 32242 . - . gene_id "ENSTBEG00000007763";
#!/usr/bin/perl use warnings; use strict; my @records; open FILE, "vik.txt" or die $!; while(<FILE>) { chomp; my @columns = split ' ', $_; push @records, \@columns; } foreach my $record(@records) { if ($record->[2] eq "exon") { split ('d+',@$record); print "$record \n"; } }
In reply to string problem by new19
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |