Skip to content

Instantly share code, notes, and snippets.

@Whateverable
Created September 5, 2017 07:50
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save Whateverable/50bd16934e6bc93ad49a1659cf31bf06 to your computer and use it in GitHub Desktop.
Save Whateverable/50bd16934e6bc93ad49a1659cf31bf06 to your computer and use it in GitHub Desktop.
committable6test
4b02b8aadcb4^,4b02b8aadcb4 https://gist.githubusercontent.com/AlexDaniel/3b1de21b5aa4ed4c5449e6393ebf8737/raw/a04c3dcab9c1f731c632510a0f3cdff80502c1e5/gistfile1.txt
¦«4b02b8aadcb4^»:
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|82784472) ... }
ok 23 - AoA should have 3 rows
ok 24 - Content
ok 25 - Class (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 56 - AoA should have 3 rows
ok 57 - Content
ok 58 - Method (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 89 - AoA should have 3 rows
ok 90 - Content
ok 91 - Sub (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 122 - AoA should have 3 rows
ok 123 - Content
ok 124 - Sub/Obj (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 141 - csv => Str (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 155 - csv => Array (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 166 - csv => Hash (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 193 - new for Hash + skip
ok 194 - colnames
ok 195 - csv => Hash + skip (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 218 - new for Hash + auto
ok 219 - csv => Hash + auto (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 240 - new for Block
ok 241 - csv => Block (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 254 - csv => Block (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 273 - new for Channel
ok 274 - csv => Channel (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 295 - new for Channel
ok 296 - csv => Channel (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 317 - new for Channel + Hash
ok 318 - csv => Channel (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 339 - new for Supplier
ok 340 - csv => Supplier (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 361 - new for Supply
ok 362 - csv => Supplier (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 383 - new for Supply + Hash
ok 384 - csv => Supplier (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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|82784472) ... }
ok 405 - new for Hash + hdrs
ok 406 - csv => Hash + hdrs (Block) -> ;; $_? is raw { \#`(Block|56981944) ... }
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
¦«4b02b8a»:
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|90005408) ... }
ok 23 - AoA should have 3 rows
ok 24 - Content
ok 25 - Class (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 56 - AoA should have 3 rows
ok 57 - Content
ok 58 - Method (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 89 - AoA should have 3 rows
ok 90 - Content
ok 91 - Sub (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 122 - AoA should have 3 rows
ok 123 - Content
ok 124 - Sub/Obj (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 141 - csv => Str (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 155 - csv => Array (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 166 - csv => Hash (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 193 - new for Hash + skip
ok 194 - colnames
ok 195 - csv => Hash + skip (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 218 - new for Hash + auto
ok 219 - csv => Hash + auto (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 240 - new for Block
ok 241 - csv => Block (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 254 - csv => Block (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 273 - new for Channel
ok 274 - csv => Channel (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 295 - new for Channel
ok 296 - csv => Channel (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 317 - new for Channel + Hash
ok 318 - csv => Channel (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 339 - new for Supplier
ok 340 - csv => Supplier (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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
# Failed test 'AOA parse out'
# at /tmp/Ybcefcq8Sp line 267
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|90005408) ... }
ok 361 - new for Supply
ok 362 - csv => Supplier (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 383 - new for Supply + Hash
ok 384 - csv => Supplier (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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|90005408) ... }
ok 405 - new for Hash + hdrs
ok 406 - csv => Hash + hdrs (Block) -> ;; $_? is raw { \#`(Block|111367608) ... }
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
not ok 415 - AOA parse out
ok 416 - AOH out file
not 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
not ok 421 - data from CODE/AR
ok 422 - out from CODE/HR
not ok 423 - data from CODE/HR
ok 424 - out from CODE/HR (auto headers)
not ok 425 - data from CODE/HR
ok 426 - Out to Str
ok 427 - AOA out file
not ok 428 - AOA parse out
1..428
# expected: $[["1", "2", "3"], ["2", "a b", ""]]
# got: $[["1", "2", "3"],]
# Failed test 'AOH parse out'
# at /tmp/Ybcefcq8Sp line 271
# expected: $[{:bar("1"), :baz("2"), :foo("3")}, {:bar("2"), :baz("a b"), :foo("")}]
# got: $[]
# Failed test 'data from CODE/AR'
# at /tmp/Ybcefcq8Sp line 278
# expected: $[["bar", "baz", "foo"], ["1", "2", "3"], ["2", "a b", ""]]
# got: $[["bar", "baz", "foo"],]
# Failed test 'data from CODE/HR'
# at /tmp/Ybcefcq8Sp line 286
# expected: $[{:bar("1"), :baz("2"), :foo("3")}, {:bar("2"), :baz("a b"), :foo("")}]
# got: $[]
# Failed test 'data from CODE/HR'
# at /tmp/Ybcefcq8Sp line 290
# expected: $[{:bar("1"), :baz("2"), :foo("3")}, {:bar("2"), :baz("a b"), :foo("")}]
# got: $[]
# Failed test 'AOA parse out'
# at /tmp/Ybcefcq8Sp line 299
# expected: $[["1", "2", "3"], ["2", "a b", ""]]
# got: $[["1", "2", "3"],]
# Looks like you failed 6 tests of 428 «exit code = 6»
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment