[regex] What does $1 mean in Perl?