Setting $. does not do anything. It just changes the number that will get incremented next time you read a line. Perl doesn't use this number for anything, its there for the programmer to read, and reset. But nothing you put in it will affect the read operation.