perl -MBencode=bdecode -gnE \
  'say $_->{info}{name} for bdecode $_' \
  ~/.local/share/qBittorrent/BT_backup/1f1c7bab36973365cbe6572b09e0926abaad31a6.torrent \
| perl -pe ''