]> git.ipfire.org Git - thirdparty/coreutils.git/commitdiff
.
authorJim Meyering <jim@meyering.net>
Sun, 26 Nov 2000 15:52:13 +0000 (15:52 +0000)
committerJim Meyering <jim@meyering.net>
Sun, 26 Nov 2000 15:52:13 +0000 (15:52 +0000)
tests/dd/skip-seek

index 7ff3f589837b922b36bf5de4dd155523bbaccc60..72bae548a9c0e8fed14cf07ced819d0d5b26450d 100755 (executable)
@@ -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}]},
      ],
     );