ちゃんとした変数のルールがぱっとでてこないけど
/\$([a-z0-9_]+)->[\[{]/iにマッチしちゃうと
アロー演算子として処理される可能性が高い

例えば以下は構文エラー
perl -e 'print "$test->{\n"'
perl -e 'print "$test->{}\n"'
perl -e 'print "$test->[\n"'
perl -e 'print "$test->[]\n"'


心配なら
my $arrow = '->';
print "${arrow}";
でいいんじゃね？