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 | 
