reg reggular expressions

[Anonymous Monk]

Hi all,
I have a file with multipe patterns which are repeated. i want to find the occurance of each pattern (the name) and the no of times it is occured, using regular expressions. can any one help me out thank u

[kielstirling]

Hi,

This is a very vague question. Supply more details and some example code and I'll try to help you.

[Anonymous Monk]

if the file is like this..
mmu-miR-16-1-3p 8
mmu-miR-1-1-3p 8
mmu-miR-500
mmu-miR-16-1-3p 8
i need to identify how many individal patterns are available; how many repeats are there for each individual. thank you

[kielstirling]

Hi,

I would use a hash..

#!/usr/bin/perl -w

use strict;

my @files = (
        "mmu-miR-16-1-3p 8",
        "mmu-miR-1-1-3p 8",
        "mmu-miR-500",
        "mmu-miR-16-1-3p 8"
);

my %pattern_count;
map $pattern_count{$_}++, @files;
print "filename $_ patten count $pattern_count{$_}\n"
        for keys %pattern_count;