C:\_wo\pl_test>perl -c amp.pl
Name "main::index_loc" used only once: possible typo at amp.pl line 64.
Name "main::link_target" used only once: possible typo at amp.pl line 171.
Name "main::wd" used only once: possible typo at amp.pl line 74.
Name "main::docroot_web" used only once: possible typo at amp.pl line 156.
Name "main::high_results" used only once: possible typo at amp.pl line 152.
Name "main::page_script" used only once: possible typo at amp.pl line 153.
Name "main::grains" used only once: possible typo at amp.pl line 63.
amp.pl syntax OK