committable6

query

MVM_SPESH_NODELAY=1 MVM_SPESH_BLOCKING=1 6a66b3593f606 https://gist.githubusercontent.com/AlexDaniel/fa3ff6a15276aec7617c3d21b75fc426/raw/f887e084d3d37d2133e5edfa2495c0cc6c336140/90_csv.t

result

¦«6a66b35»:
ok 1 - Class   (Str)            _90in.csv
ok 2 - AoA should have 3 rows
ok 3 - Content
ok 4 - Class   (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 5 - AoA should have 3 rows
ok 6 - Content
ok 7 - Class   (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 8 - AoA should have 3 rows
ok 9 - Content
ok 10 - Class   (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 11 - AoA should have 3 rows
ok 12 - Content
ok 13 - Class   (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 14 - AoA should have 3 rows
ok 15 - Content
ok 16 - Class   (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 17 - AoA should have 3 rows
ok 18 - Content
ok 19 - Class   (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 20 - AoA should have 3 rows
ok 21 - Content
ok 22 - Class   (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 23 - AoA should have 3 rows
ok 24 - Content
ok 25 - Class   (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 26 - AoA should have 3 rows
ok 27 - Content
ok 28 - Class   (Supply)         Supply.new
ok 29 - AoA should have 3 rows
ok 30 - Content
ok 31 - Class   (Channel)        Channel.new
ok 32 - AoA should have 3 rows
ok 33 - Content
ok 34 - Method  (Str)            _90in.csv
ok 35 - AoA should have 3 rows
ok 36 - Content
ok 37 - Method  (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 38 - AoA should have 3 rows
ok 39 - Content
ok 40 - Method  (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 41 - AoA should have 3 rows
ok 42 - Content
ok 43 - Method  (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 44 - AoA should have 3 rows
ok 45 - Content
ok 46 - Method  (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 47 - AoA should have 3 rows
ok 48 - Content
ok 49 - Method  (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 50 - AoA should have 3 rows
ok 51 - Content
ok 52 - Method  (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 53 - AoA should have 3 rows
ok 54 - Content
ok 55 - Method  (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 56 - AoA should have 3 rows
ok 57 - Content
ok 58 - Method  (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 59 - AoA should have 3 rows
ok 60 - Content
ok 61 - Method  (Supply)         Supply.new
ok 62 - AoA should have 3 rows
ok 63 - Content
ok 64 - Method  (Channel)        Channel.new
ok 65 - AoA should have 3 rows
ok 66 - Content
ok 67 - Sub     (Str)            _90in.csv
ok 68 - AoA should have 3 rows
ok 69 - Content
ok 70 - Sub     (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 71 - AoA should have 3 rows
ok 72 - Content
ok 73 - Sub     (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 74 - AoA should have 3 rows
ok 75 - Content
ok 76 - Sub     (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 77 - AoA should have 3 rows
ok 78 - Content
ok 79 - Sub     (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 80 - AoA should have 3 rows
ok 81 - Content
ok 82 - Sub     (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 83 - AoA should have 3 rows
ok 84 - Content
ok 85 - Sub     (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 86 - AoA should have 3 rows
ok 87 - Content
ok 88 - Sub     (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 89 - AoA should have 3 rows
ok 90 - Content
ok 91 - Sub     (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 92 - AoA should have 3 rows
ok 93 - Content
ok 94 - Sub     (Supply)         Supply.new
ok 95 - AoA should have 3 rows
ok 96 - Content
ok 97 - Sub     (Channel)        Channel.new
ok 98 - AoA should have 3 rows
ok 99 - Content
ok 100 - Sub/Obj (Str)            _90in.csv
ok 101 - AoA should have 3 rows
ok 102 - Content
ok 103 - Sub/Obj (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 104 - AoA should have 3 rows
ok 105 - Content
ok 106 - Sub/Obj (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 107 - AoA should have 3 rows
ok 108 - Content
ok 109 - Sub/Obj (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 110 - AoA should have 3 rows
ok 111 - Content
ok 112 - Sub/Obj (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 113 - AoA should have 3 rows
ok 114 - Content
ok 115 - Sub/Obj (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 116 - AoA should have 3 rows
ok 117 - Content
ok 118 - Sub/Obj (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 119 - AoA should have 3 rows
ok 120 - Content
ok 121 - Sub/Obj (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 122 - AoA should have 3 rows
ok 123 - Content
ok 124 - Sub/Obj (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 125 - AoA should have 3 rows
ok 126 - Content
ok 127 - Sub/Obj (Supply)         Supply.new
ok 128 - AoA should have 3 rows
ok 129 - Content
ok 130 - Sub/Obj (Channel)        Channel.new
ok 131 - AoA should have 3 rows
ok 132 - Content
ok 133 - csv => Str   (Str)            _90in.csv
ok 134 - csv => Str   (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 135 - csv => Str   (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 136 - csv => Str   (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 137 - csv => Str   (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 138 - csv => Str   (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 139 - csv => Str   (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 140 - csv => Str   (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 141 - csv => Str   (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 142 - csv => Str   (Supply)         Supply.new
ok 143 - csv => Str   (Channel)        Channel.new
ok 144 - Fragment, row
ok 145 - Fragment, col
ok 146 - Fragment, cell
ok 147 - csv => Array (Str)            _90in.csv
ok 148 - csv => Array (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 149 - csv => Array (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 150 - csv => Array (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 151 - csv => Array (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 152 - csv => Array (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 153 - csv => Array (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 154 - csv => Array (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 155 - csv => Array (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 156 - csv => Array (Supply)         Supply.new
ok 157 - csv => Array (Channel)        Channel.new
ok 158 - csv => Hash  (Str)            _90in.csv
ok 159 - csv => Hash  (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 160 - csv => Hash  (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 161 - csv => Hash  (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 162 - csv => Hash  (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 163 - csv => Hash  (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 164 - csv => Hash  (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 165 - csv => Hash  (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 166 - csv => Hash  (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 167 - csv => Hash  (Supply)         Supply.new
ok 168 - csv => Hash  (Channel)        Channel.new
ok 169 - new for Hash + skip
ok 170 - colnames
ok 171 - csv => Hash + skip (Str)            _90in.csv
ok 172 - new for Hash + skip
ok 173 - colnames
ok 174 - csv => Hash + skip (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 175 - new for Hash + skip
ok 176 - colnames
ok 177 - csv => Hash + skip (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 178 - new for Hash + skip
ok 179 - colnames
ok 180 - csv => Hash + skip (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 181 - new for Hash + skip
ok 182 - colnames
ok 183 - csv => Hash + skip (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 184 - new for Hash + skip
ok 185 - colnames
ok 186 - csv => Hash + skip (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 187 - new for Hash + skip
ok 188 - colnames
ok 189 - csv => Hash + skip (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 190 - new for Hash + skip
ok 191 - colnames
ok 192 - csv => Hash + skip (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 193 - new for Hash + skip
ok 194 - colnames
ok 195 - csv => Hash + skip (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 196 - new for Hash + skip
ok 197 - colnames
ok 198 - csv => Hash + skip (Supply)         Supply.new
ok 199 - new for Hash + skip
ok 200 - colnames
ok 201 - csv => Hash + skip (Channel)        Channel.new
ok 202 - new for Hash + auto
ok 203 - csv => Hash + auto (Str)            _90in.csv
ok 204 - new for Hash + auto
ok 205 - csv => Hash + auto (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 206 - new for Hash + auto
ok 207 - csv => Hash + auto (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 208 - new for Hash + auto
bar,baz,foo
ok 209 - csv => Hash + auto (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 210 - new for Hash + auto
bar,baz,foo
ok 211 - csv => Hash + auto (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 212 - new for Hash + auto
bar,baz,foo
ok 213 - csv => Hash + auto (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 214 - new for Hash + auto
bar,baz,foo
ok 215 - csv => Hash + auto (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 216 - new for Hash + auto
ok 217 - csv => Hash + auto (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 218 - new for Hash + auto
ok 219 - csv => Hash + auto (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 220 - new for Hash + auto
ok 221 - csv => Hash + auto (Supply)         Supply.new
ok 222 - new for Hash + auto
ok 223 - csv => Hash + auto (Channel)        Channel.new
ok 224 - new for Block
ok 225 - csv => Block (Str)            _90in.csv
ok 226 - new for Block
ok 227 - csv => Block (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 228 - new for Block
ok 229 - csv => Block (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 230 - new for Block
ok 231 - csv => Block (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 232 - new for Block
ok 233 - csv => Block (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 234 - new for Block
ok 235 - csv => Block (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 236 - new for Block
ok 237 - csv => Block (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 238 - new for Block
ok 239 - csv => Block (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 240 - new for Block
ok 241 - csv => Block (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 242 - new for Block
ok 243 - csv => Block (Supply)         Supply.new
ok 244 - new for Block
ok 245 - csv => Block (Channel)        Channel.new
ok 246 - csv => Block (Str)            _90in.csv
ok 247 - csv => Block (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 248 - csv => Block (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 249 - csv => Block (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 250 - csv => Block (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 251 - csv => Block (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 252 - csv => Block (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 253 - csv => Block (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 254 - csv => Block (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 255 - csv => Block (Supply)         Supply.new
ok 256 - csv => Block (Channel)        Channel.new
ok 257 - new for Channel
ok 258 - csv => Channel (Str)            _90in.csv
ok 259 - new for Channel
ok 260 - csv => Channel (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 261 - new for Channel
ok 262 - csv => Channel (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 263 - new for Channel
ok 264 - csv => Channel (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 265 - new for Channel
ok 266 - csv => Channel (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 267 - new for Channel
ok 268 - csv => Channel (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 269 - new for Channel
ok 270 - csv => Channel (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 271 - new for Channel
ok 272 - csv => Channel (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 273 - new for Channel
ok 274 - csv => Channel (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 275 - new for Channel
ok 276 - csv => Channel (Supply)         Supply.new
ok 277 - new for Channel
ok 278 - csv => Channel (Channel)        Channel.new
ok 279 - new for Channel
ok 280 - csv => Channel (Str)            _90in.csv
ok 281 - new for Channel
ok 282 - csv => Channel (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 283 - new for Channel
ok 284 - csv => Channel (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 285 - new for Channel
ok 286 - csv => Channel (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 287 - new for Channel
ok 288 - csv => Channel (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 289 - new for Channel
ok 290 - csv => Channel (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 291 - new for Channel
ok 292 - csv => Channel (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 293 - new for Channel
ok 294 - csv => Channel (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 295 - new for Channel
ok 296 - csv => Channel (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 297 - new for Channel
ok 298 - csv => Channel (Supply)         Supply.new
ok 299 - new for Channel
ok 300 - csv => Channel (Channel)        Channel.new
ok 301 - new for Channel + Hash
ok 302 - csv => Channel (Str)            _90in.csv
ok 303 - new for Channel + Hash
ok 304 - csv => Channel (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 305 - new for Channel + Hash
ok 306 - csv => Channel (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 307 - new for Channel + Hash
ok 308 - csv => Channel (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 309 - new for Channel + Hash
ok 310 - csv => Channel (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 311 - new for Channel + Hash
ok 312 - csv => Channel (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 313 - new for Channel + Hash
ok 314 - csv => Channel (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 315 - new for Channel + Hash
ok 316 - csv => Channel (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 317 - new for Channel + Hash
ok 318 - csv => Channel (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 319 - new for Channel + Hash
ok 320 - csv => Channel (Supply)         Supply.new
ok 321 - new for Channel + Hash
ok 322 - csv => Channel (Channel)        Channel.new
ok 323 - new for Supplier
ok 324 - csv => Supplier (Str)            _90in.csv
ok 325 - new for Supplier
ok 326 - csv => Supplier (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 327 - new for Supplier
ok 328 - csv => Supplier (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 329 - new for Supplier
ok 330 - csv => Supplier (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 331 - new for Supplier
ok 332 - csv => Supplier (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 333 - new for Supplier
ok 334 - csv => Supplier (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 335 - new for Supplier
ok 336 - csv => Supplier (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 337 - new for Supplier
ok 338 - csv => Supplier (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 339 - new for Supplier
ok 340 - csv => Supplier (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 341 - new for Supplier
ok 342 - csv => Supplier (Supply)         Supply.new
ok 343 - new for Supplier
ok 344 - csv => Supplier (Channel)        Channel.new
ok 345 - new for Supply
ok 346 - csv => Supplier (Str)            _90in.csv
ok 347 - new for Supply
ok 348 - csv => Supplier (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 349 - new for Supply
ok 350 - csv => Supplier (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 351 - new for Supply
ok 352 - csv => Supplier (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 353 - new for Supply
ok 354 - csv => Supplier (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 355 - new for Supply
ok 356 - csv => Supplier (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 357 - new for Supply
ok 358 - csv => Supplier (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 359 - new for Supply
ok 360 - csv => Supplier (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 361 - new for Supply
ok 362 - csv => Supplier (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 363 - new for Supply
ok 364 - csv => Supplier (Supply)         Supply.new
ok 365 - new for Supply
ok 366 - csv => Supplier (Channel)        Channel.new
ok 367 - new for Supply + Hash
ok 368 - csv => Supplier (Str)            _90in.csv
ok 369 - new for Supply + Hash
ok 370 - csv => Supplier (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 371 - new for Supply + Hash
ok 372 - csv => Supplier (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 373 - new for Supply + Hash
ok 374 - csv => Supplier (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 375 - new for Supply + Hash
ok 376 - csv => Supplier (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 377 - new for Supply + Hash
ok 378 - csv => Supplier (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 379 - new for Supply + Hash
ok 380 - csv => Supplier (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 381 - new for Supply + Hash
ok 382 - csv => Supplier (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 383 - new for Supply + Hash
ok 384 - csv => Supplier (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 385 - new for Supply + Hash
ok 386 - csv => Supplier (Supply)         Supply.new
ok 387 - new for Supply + Hash
ok 388 - csv => Supplier (Channel)        Channel.new
ok 389 - new for Hash + hdrs
ok 390 - csv => Hash + hdrs (Str)            _90in.csv
ok 391 - new for Hash + hdrs
ok 392 - csv => Hash + hdrs (Handle)         IO::Handle<"_90in.csv".IO>(opened)
ok 393 - new for Hash + hdrs
ok 394 - csv => Hash + hdrs (Capture)        \("bar,baz,foo\r\n1,2,3\r\n2,a b,\r\n")
ok 395 - new for Hash + hdrs
ok 396 - csv => Hash + hdrs (Array of Str)   [bar,baz,foo\n1,2,3\n2,a b,\n]
ok 397 - new for Hash + hdrs
ok 398 - csv => Hash + hdrs (Array of Str)   [bar,baz,foo 1,2,3 2,a b,]
ok 399 - new for Hash + hdrs
ok 400 - csv => Hash + hdrs (Array of Array) [[bar baz foo] [1 2 3] [2 a b ]]
ok 401 - new for Hash + hdrs
ok 402 - csv => Hash + hdrs (Array of Hash)  [{bar => 1, baz => 2, foo => 3} {bar => 2, baz => a b, foo => }]
ok 403 - new for Hash + hdrs
ok 404 - csv => Hash + hdrs (Sub)            sub provider () {  \#`(Sub|93887710338128) ... }
ok 405 - new for Hash + hdrs
ok 406 - csv => Hash + hdrs (Block)          -> ;; $_? is raw {  \#`(Block|93887690294896) ... }
ok 407 - new for Hash + hdrs
ok 408 - csv => Hash + hdrs (Supply)         Supply.new
ok 409 - new for Hash + hdrs
ok 410 - csv => Hash + hdrs (Channel)        Channel.new
ok 411 - AOA skip
ok 412 - AOA fragment
ok 413 - AOH headers fragment
ok 414 - AOA out file
ok 415 - AOA parse out
ok 416 - AOH out file
ok 417 - AOH parse out
ok 418 - AOH out file no header
ok 419 - AOH parse out no header
ok 420 - out from CODE/AR
ok 421 - data from CODE/AR
ok 422 - out from CODE/HR
ok 423 - data from CODE/HR
ok 424 - out from CODE/HR (auto headers)
ok 425 - data from CODE/HR
ok 426 - Out to Str
ok 427 - AOA out file
ok 428 - AOA parse out
1..428