# Read the file.
# Inject 'BEGIN { exit }' at the beginning.
# Run 'perl -ce' on the text.
# Catch the output (eg, IO::CaptureOutput, Capture::Tiny).
# Look for "syntax OK"