1# !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 2# 3# This file was automatically built from t/z9-read-variations.ttmpl 4# 5# Do not edit this file, instead edit the template and rebuild by running 6# t/build-test-scripts 7# 8# !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 9use strict; 10use warnings; 11 12# Try many combinations of read operations on an IO::Callback, checking that each 13# gives exactly the same results as Perl does for a real file. 14 15# This test is split into several .t files (one for each $seglen value), since the 16# large number of tests uses too much memory if run as a single .t file. 17 18our $seglen; 19$seglen = 10; 20 21use lib 't'; 22require 'read-variations.inc'; 23 24