You're viewing a comment by newestbie and its responses.

newestbie Permalink
December 27, 2011, 09:16

my $string = "-" x 1000;
$string =~ s/(?!(-{2,})\1{1,}$)(?=(-{2,}))/print length($2), "\n"/eg;

Reply To This Comment

(why do I need your e-mail?)

(Your twitter handle, if you have one.)

Type the word "floppy_298": (just to make sure you're a human)

Please preview the comment before submitting to make sure it's OK.