You are matching $d_log, not $test, and are missing a brace:

my $d_log = "Auto And Company 57 DI 13 FA 13 FAI 4 Login 23 Not Found 
+4";
if( $d_log =~ 
/^
 (.*?)\s
 (\d+)\s
 (\w+)\s
 (\d+)\s
 (\w+)\s
 (\d+)\s
 (\w+)\s
 (\d+)\s
 (\w+)\s
 (\d+)\s
 (\w+)\s
 (\w+)\s
 (\d+)
$
 /x) {
    print $1;
}
[download]

Consider using the //x modifier for long complex regexps; it really helps readability.