summaryrefslogtreecommitdiff
path: root/tests/cp/sparse-fiemap
diff options
context:
space:
mode:
authorJim Meyering <meyering@redhat.com>2011-04-20 09:46:27 +0200
committerJim Meyering <meyering@redhat.com>2011-04-20 09:46:27 +0200
commit48306b83bececcce14d688e18bd84ee9861e503e (patch)
tree13c5260c2224d732cf10f3d523601aafae5474ce /tests/cp/sparse-fiemap
parent9f688b83637aea26c98661752d9b4e39441b65c3 (diff)
downloadcoreutils-48306b83bececcce14d688e18bd84ee9861e503e.tar.xz
tests: remove spurious syntax from a perl snippet
* tests/cp/sparse-fiemap: Remove spurious BEGIN {...} block.
Diffstat (limited to 'tests/cp/sparse-fiemap')
-rwxr-xr-xtests/cp/sparse-fiemap2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/cp/sparse-fiemap b/tests/cp/sparse-fiemap
index 90d55d932..2c6a2506e 100755
--- a/tests/cp/sparse-fiemap
+++ b/tests/cp/sparse-fiemap
@@ -65,7 +65,7 @@ f()
for i in $(seq 1 2 21); do
for j in 1 2 31 100; do
- $PERL -e 'BEGIN { $n = '$i' * 1024; *F = *STDOUT }' \
+ $PERL -e '$n = '$i' * 1024; *F = *STDOUT;' \
-e 'for (1..'$j') { sysseek (*F, $n, 1)' \
-e '&& syswrite (*F, chr($_)x$n) or die "$!"}' > j1 || fail=1