diff options
| -rwxr-xr-x | test.pl | 1 | ||||
| -rwxr-xr-x[-rw-r--r--] | test.sh | 14 |
2 files changed, 14 insertions, 1 deletions
@@ -3,6 +3,7 @@ use strict; use Test::More tests => 9; +require 'prettify_hipchat.pl'; my $title_message = <<'END_MESSAGE'; SC-1000 : Some kind of issue text that is kind of long and describes the problem that we saw during testing. @@ -1,3 +1,15 @@ #!/usr/bin/env sh -pcregrep -M '^sub prettify_hipchat {.*(\n|.)*?}' hipchat-stfu.pl +sub=$(pcregrep -M '^sub prettify_hipchat {.*(\n|.)*?}' hipchat-stfu.pl) + +cat > prettify_hipchat.pl <<EOF +use strict; + +$sub + +1; +EOF + +./test.pl + +rm prettify_hipchat.pl |
