Bug#916681: Perl::Tidy: tries to access file "SCALAR(0x...)" in cwd

[Jakub Wilk]

Control: reopen -1
Control: found -1 20220613-1

It's still reproducible:
  $ perltidy --version | head -n1
  This is perltidy, v20220613 

  $ strace -o '| grep -w SCALAR >&2' perl selftidy > /dev/null
  statx(AT_FDCWD, "SCALAR(0x59770e08)", AT_STATX_SYNC_AS_STAT|AT_NO_AUTOMOUNT, 
STATX_BASIC_STATS, 0xffe30d4c) = -1 ENOENT (No such file or directory)

--
Jakub Wilk