aboutsummaryrefslogtreecommitdiffstats
path: root/t/100-increment-decrement.t
diff options
context:
space:
mode:
Diffstat (limited to 't/100-increment-decrement.t')
-rw-r--r--t/100-increment-decrement.t8
1 files changed, 8 insertions, 0 deletions
diff --git a/t/100-increment-decrement.t b/t/100-increment-decrement.t
index d83a35a..ee5a849 100644
--- a/t/100-increment-decrement.t
+++ b/t/100-increment-decrement.t
@@ -228,6 +228,14 @@ is_deeply(
'decrements the second integer by 2 with point at position 9 backward'
);
+@got = incdec::incdec('test_99_A_-_03_[a30df7cf]', 1, 15, 1);
+@want = ('test_99_A_-_04_[a30df7cf]', 13);
+is_deeply(
+ \@got,
+ \@want,
+ 'increments the second zero-prefixed integer by 1 with point at position 15 backward'
+);
+
@got = incdec::incdec("sed -n '39,54p' Alice\'s\ Adventures\ in\ Wonderland.txt ", 1, 3, 1);
@want = ("sed -n '40,54p' Alice\'s\ Adventures\ in\ Wonderland.txt ", 8);
is_deeply(