From: Jim Meyering Date: Sun, 26 Nov 2000 15:52:13 +0000 (+0000) Subject: . X-Git-Tag: FILEUTILS-4_0_33~27 X-Git-Url: http://git.ipfire.org/gitweb/index.cgi?a=commitdiff_plain;h=2d354c5a2e44902ffc5336199973200c3cf02861;p=thirdparty%2Fcoreutils.git . --- diff --git a/tests/dd/skip-seek b/tests/dd/skip-seek index 7ff3f58983..72bae548a9 100755 --- a/tests/dd/skip-seek +++ b/tests/dd/skip-seek @@ -26,19 +26,13 @@ my $script_name = $ENV{SCRIPT_NAME}; my @Tests = ( - ['1', (qw (bs=1 skip=1 seek=2 conv=notrunc count=3), "of=$out", '<'), - {PRE => sub {my $ignore=`echo zyxwvutsrqponmlkji > $out`}}, - {IN=> '0123456789abcdef'}, - {OUT=> ''}, - {ERR=> "3+0 records in\n3+0 records out\n"}, - {POST=> sub { my $expected = "exp-$$"; - my $t=`echo zy123utsrqponmlkji > $expected`; - compare_files ($script_name, undef, undef, $out, $expected) - and die "the file `$out' does not have the expected" - . " contents\n (should be same as `$expected')\n"; - unlink $out; - unlink $expected; - }}, + [ + '1', qw (bs=1 skip=1 seek=2 conv=notrunc count=3 of=@AUX@ < ), + {IN=> '0123456789abcdef'}, + {AUX=> 'zyxwvutsrqponmlkji'}, + {OUT=> ''}, + {ERR=> "3+0 records in\n3+0 records out\n"}, + {CMP=> ['zy123utsrqponmlkji', {'@AUX@'=> undef}]}, ], );