USAGEMSG is the name of the constant being defined.

USAGE is a string of characters being used to mark the end of the Heredoc (a way of defining the value of a string) block. You can read about the syntax in perldoc perlop. Grep for "<<EOF".