From 64b7925c4b2226010c1f478a7247310492f99ac3 Mon Sep 17 00:00:00 2001 From: leannehaggerty Date: Thu, 17 Nov 2016 16:41:10 +0000 Subject: [PATCH 1/5] git test commit --- gittest.pl.bak | 20 ++++++++++++++++++++ t/gittest.t | 18 ++++++++++++++++++ 2 files changed, 38 insertions(+) create mode 100644 gittest.pl.bak create mode 100644 t/gittest.t diff --git a/gittest.pl.bak b/gittest.pl.bak new file mode 100644 index 0000000..02a8b1e --- /dev/null +++ b/gittest.pl.bak @@ -0,0 +1,20 @@ + +use strict ; +use perl ; + +use Test::More ; + +my $a = 23 ; +my $b=4 ; + +is( $a, 24, "Test A" ); +is( $b, 4, "Test B" ) ; + + +my $str=5 ; +for($i=0;$i<10;$i++) + { + $str += "hello" ; + } + +is( length $str, 334, "String length" ) ; diff --git a/t/gittest.t b/t/gittest.t new file mode 100644 index 0000000..8b797cd --- /dev/null +++ b/t/gittest.t @@ -0,0 +1,18 @@ + +use strict; +use perl; + +use Test::More; + +my $a = 23; +my $b = 4; + +is( $a, 24, "Test A" ); +is( $b, 4, "Test B" ); + +my $str = 5; +for ( $i = 0; $i < 10; $i++ ) { + $str += "hello"; +} + +is( length $str, 334, "String length" ); From 1ee1eace3321714984c5b4a07b677c647942ac1e Mon Sep 17 00:00:00 2001 From: leannehaggerty Date: Thu, 17 Nov 2016 16:55:26 +0000 Subject: [PATCH 2/5] git test commit 2 --- t/gittest.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/gittest.t b/t/gittest.t index 8b797cd..018d148 100644 --- a/t/gittest.t +++ b/t/gittest.t @@ -4,7 +4,7 @@ use perl; use Test::More; -my $a = 23; +my $a = 24; my $b = 4; is( $a, 24, "Test A" ); From 3b2631a9c5b025b566fb178037c1f92893ff5974 Mon Sep 17 00:00:00 2001 From: leannehaggerty Date: Tue, 29 Nov 2016 15:46:10 +0000 Subject: [PATCH 3/5] git test commit --- gittest.pl | 18 ++++++++++++++++++ t/gittest.t | 4 ++-- 2 files changed, 20 insertions(+), 2 deletions(-) create mode 100644 gittest.pl diff --git a/gittest.pl b/gittest.pl new file mode 100644 index 0000000..8b797cd --- /dev/null +++ b/gittest.pl @@ -0,0 +1,18 @@ + +use strict; +use perl; + +use Test::More; + +my $a = 23; +my $b = 4; + +is( $a, 24, "Test A" ); +is( $b, 4, "Test B" ); + +my $str = 5; +for ( $i = 0; $i < 10; $i++ ) { + $str += "hello"; +} + +is( length $str, 334, "String length" ); diff --git a/t/gittest.t b/t/gittest.t index 018d148..2d82c77 100644 --- a/t/gittest.t +++ b/t/gittest.t @@ -10,9 +10,9 @@ my $b = 4; is( $a, 24, "Test A" ); is( $b, 4, "Test B" ); -my $str = 5; +my $str = '5'; for ( $i = 0; $i < 10; $i++ ) { - $str += "hello"; + $str .= "hello"; } is( length $str, 334, "String length" ); From 94a7aa5d21fa89ce06b284972ad29e09a9a9c477 Mon Sep 17 00:00:00 2001 From: leannehaggerty Date: Tue, 29 Nov 2016 17:00:29 +0000 Subject: [PATCH 4/5] git test --- t/gittest.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/gittest.t b/t/gittest.t index 2d82c77..7eba0e7 100644 --- a/t/gittest.t +++ b/t/gittest.t @@ -15,4 +15,4 @@ for ( $i = 0; $i < 10; $i++ ) { $str .= "hello"; } -is( length $str, 334, "String length" ); +#is( length $str, 334, "String length" ); From ca3d0833f4e6b691dffd62605ee919e870cf00ed Mon Sep 17 00:00:00 2001 From: leannehaggerty Date: Thu, 8 Dec 2016 12:24:56 +0000 Subject: [PATCH 5/5] travis_test --- gittest.pl | 18 ------------------ t/gittest.t | 8 ++++---- 2 files changed, 4 insertions(+), 22 deletions(-) delete mode 100644 gittest.pl diff --git a/gittest.pl b/gittest.pl deleted file mode 100644 index 8b797cd..0000000 --- a/gittest.pl +++ /dev/null @@ -1,18 +0,0 @@ - -use strict; -use perl; - -use Test::More; - -my $a = 23; -my $b = 4; - -is( $a, 24, "Test A" ); -is( $b, 4, "Test B" ); - -my $str = 5; -for ( $i = 0; $i < 10; $i++ ) { - $str += "hello"; -} - -is( length $str, 334, "String length" ); diff --git a/t/gittest.t b/t/gittest.t index 7eba0e7..8b797cd 100644 --- a/t/gittest.t +++ b/t/gittest.t @@ -4,15 +4,15 @@ use perl; use Test::More; -my $a = 24; +my $a = 23; my $b = 4; is( $a, 24, "Test A" ); is( $b, 4, "Test B" ); -my $str = '5'; +my $str = 5; for ( $i = 0; $i < 10; $i++ ) { - $str .= "hello"; + $str += "hello"; } -#is( length $str, 334, "String length" ); +is( length $str, 334, "String length" );