Help for this page
my @users; foreach (@lines) { /<!-- USER \d+ - (\S+) -->/i and push @users, $1; }