ok so I stepped back and used your example, but added in my file read and now with this code:

#!/usr/bin/perl -w
use strict;
use warnings;

my $log_pattern = q{(.*) \- \- \[(.*)\] \"(.*) (.*)\?(.*) HTTP\/(.*)\"
+ ([0-9]*) ([0-9]*) \"(.*)\" \"(.*)\" \"(.*)\"};

open (LOG, "< $ARGV[0]") or die "Cannot open file $ARGV[0]\n";

my @log = <LOG>;

close ( LOG );

my $line;

foreach $line (@log) 
{  
    $line =~ /$log_pattern/;
    print $1."\n";
    print $2."\n";
    print $3."\n";
    print $4."\n";
    print $5."\n";
    print $6."\n";
    print $7."\n";
    print $8."\n";
    print $9."\n";
    print $10."\n";
    print $11."\n";
}
close(SEM);
[download]

I get this:

Use of uninitialized value in concatenation (.) or string at parselogs
+ line 23.

Use of uninitialized value in concatenation (.) or string at parselogs
+ line 24.

Use of uninitialized value in concatenation (.) or string at parselogs
+ line 25.

Use of uninitialized value in concatenation (.) or string at parselogs
+ line 26.

Use of uninitialized value in concatenation (.) or string at parselogs
+ line 27.
[download]

now I am very confused.