For reference:
$ perl -v
This is perl 5, version 32, subversion 1 (v5.32.1) built for x86_64-li
+nux-gnu-thread-multi
$ perl -MExpect -e 'print $Expect::VERSION ."\n";'
1.21
$ perl 11138979.pl
Match before : #######################################################
+#######################\r\n# This system is a restricted access syste
+m. #\r\n# If collected security informa
+tion reveals possible criminal activity that #\r\n# exceeds privileg
+es, evidence of such activity may be provided to the rele- #\r\n# van
+tauthorities for further action. By continuing past this point, you #
+\r\n# expressly consent to this security monitoring. #\r
+\n###################################################################
+###########\r\n\r\nhostname
Match : : ~#
Match after :