Perl regexp \A doesn't match start of file?

Question

I am iterating through a file line by line, picking out lines that start with asterix: *. My simple regexp works for all lines except the very first line of the file.