for my $x (@x) {
      my %h = (
            'truncate' => {
                  'desc'  => 'shorten a file',
                  'usage' => [
                        'truncate FILEHANDLE,LENGTH',
                        'truncate EXPR,LENGTH',
                    ]
              },
        );
  };