rc at this site
  $argv .= &quot; -pbp&quot;;     # Format according to perl best practices
  $argv .= &quot; -nst&quot;;     # Must turn off -st in case -pbp is specified
  $argv .= &quot; -se&quot;;      # -se appends the errorfile to stderr
  ## $argv .= &quot; --spell-check&quot;;  # uncomment to trigger an error

  print &quot;&lt;&lt;RAW SOURCE&gt;&gt;\n$source_string\n&quot;;

  my $error = Perl::Tidy::perltidy(
      argv        =&gt; $argv,
      source      =&gt; \$source_string,
      destination