From 517ba113aaaae0dd3c4def0b3baab62882437978 Mon Sep 17 00:00:00 2001 From: Saif Ahmed <34284663+saiftynet@users.noreply.github.com> Date: Tue, 7 Jan 2020 22:25:16 +0000 Subject: Update ch-2.pl add use strict and use warnings --- challenge-042/saiftynet/perl5/ch-2.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'challenge-042') 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 -- cgit