The match is only stored in $1. However, if you evaluate the match in list context, you get all matches:

use strict;
my $string="camel_camel_camel";
print join "\n",($string =~ /camel/g);
__END__
camel
camel
camel
[download]

CU
Robartes-