http://qs1969.pair.com?node_id=291641

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Trying to get a count of how many times this page has a reg expression match on abcdef. The attempt below keeps giving me a result of 1 hit. Please advise how I can correct this?
use strict; my $url = 'ftp://ftp.thesite.com/directory/'; my $content = get($url); my @files; push(@files,$content); for(@files) { if( $_ =~ /(abcdef)/ ) { print "$1\n"; print (scalar(@files)); } }