diff options
Diffstat (limited to 'challenge-042')
| -rw-r--r-- | challenge-042/saiftynet/perl5/ch-2.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-042/saiftynet/perl5/ch-2.pl b/challenge-042/saiftynet/perl5/ch-2.pl index 0258c73d6f..ae8d9584a6 100644 --- a/challenge-042/saiftynet/perl5/ch-2.pl +++ b/challenge-042/saiftynet/perl5/ch-2.pl @@ -4,14 +4,14 @@ # of ( and ) brackets. Then make the script validate the # string if it has balanced brackets. -# This gcontains two subroutines, 1 to generate random strings, +# This contains two subroutines, 1 to generate random strings, # (random in both length and sequence) and one to test whether # the brackets are balanced or not. The script also shows which # are the unmtached brackets. # # With random strings, unblanaced strings are far more common # so 100 are generated and tested - +use strict; use warnings; for (1..100){ my $testString=randomString(); # generate random string |