$ perl thestuff
Bareword found where operator expected at thestuff line 3, near "-> new Encode::Detect::Detector"
        (Missing operator before Encode::Detect::Detector?)
Scalar found where operator expected at thestuff line 5, near ")
$charset"
        (Missing semicolon on previous line?)
syntax error at thestuff line 3, near "-> new Encode::Detect::Detector"
syntax error at thestuff line 5, near ")
$charset "
Execution of thestuff aborted due to compilation errors.