perl -gne'
   use v5.36;
   use utf8::all;
   use Bencode qw( bdecode );
   say bdecode( $_ )->{info}{name};
'