This "perl" code:
connstr='user/password@DB';
$account='sqlplus -s $connstr <<END
...
Has a few issues:
- connstr should be $connstr (Missing dollar sign), and preceding "my"
- Setting $account uses SINGLE QUOTES, which will not interpolate $connstr.
- Other variables inside the "heredoc" will not be interpolated either.
- The "heredoc" does not appear to be correctly formatted
This is not an optical illusion, it just looks like one.