Regular expression help for newbie

Can someone tell me what these two expressions do?

$_[1] =~ s/\*/\.\*/;

$[0] =~ m/($[1])\s*$/i

Can you put this in context? It looks like perl, but I'm not sure. It would also help to make sure this isn't a homework question...