($flags, $img, $name, $big, $gallery, $page, $caption. $num )
       = @$opts{qw(flags img name big gallery page caption num)};