summaryrefslogtreecommitdiff
path: root/lib/perl5db
diff options
context:
space:
mode:
authorShlomi Fish <shlomif@shlomifish.org>2011-12-12 16:51:00 +0200
committerRicardo Signes <rjbs@cpan.org>2011-12-28 13:27:01 -0500
commit5343a617e1832a76d9e6805260dbcd579e845218 (patch)
treee480adf7039fe0009c0776e2147e8eccd8264688 /lib/perl5db
parente0538447777c738c86d5c7ae0986fc363348727d (diff)
downloadperl-5343a617e1832a76d9e6805260dbcd579e845218.tar.gz
perl -d: fixes "b . COND()".
break-dot for filename was broken due to previous commits. It was fixed now. Also documented it in pod/perldebug.pod, because it was undocumented.
Diffstat (limited to 'lib/perl5db')
-rw-r--r--lib/perl5db/t/break-on-dot10
1 files changed, 10 insertions, 0 deletions
diff --git a/lib/perl5db/t/break-on-dot b/lib/perl5db/t/break-on-dot
new file mode 100644
index 0000000000..a9ee1a3093
--- /dev/null
+++ b/lib/perl5db/t/break-on-dot
@@ -0,0 +1,10 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+my $exp = 1;
+for my $i (1 .. 20)
+{
+ $exp *= 2;
+}