Count variables in script

[Jaschar Otto]

Hi all,
i'm working on a script to parse some informations out of another script,
i.e. number of lines, number of subs and number of variables (including the names).
I've got a problem with the variable names since i cannot find working regexp.

open FILE,"$ARGV[0]";
for $line (<FILE>) {
    $line =~ m/some_regexp/;  # get variables
    $variables{$line} += 1;
}
close FILE;

for (keys %variables) {
    print "$_ $variables{$_}\n";
}

This is an example of how i want to do it, any suggestions about how
to do the regexp to match several variables in one line, too ?

Thanks
    Jaschar Otto


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]