Perl Shell - A Solution

$usage = "...\n";

This line is simply an assignment for a scalar variable. To clearly see this, notice the placement of the quotation marks.

Recall: