From 4003f9f88470673d19e204f435fa2385f5bd3492 Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Fri, 20 Sep 2013 10:04:41 -0400 Subject: [PATCH] Bug 9288: (follow-up) use specified terminator for both input and output Signed-off-by: Katrin Fischer Signed-off-by: Galen Charlton (cherry picked from commit 8af35f89badacaf025226811c233f2cf44554910) Signed-off-by: Fridolin Somers --- misc/sip_cli_emulator.pl | 3 +++ 1 file changed, 3 insertions(+) diff --git a/misc/sip_cli_emulator.pl b/misc/sip_cli_emulator.pl index 708b1bb558..dc8ce537a6 100755 --- a/misc/sip_cli_emulator.pl +++ b/misc/sip_cli_emulator.pl @@ -49,6 +49,9 @@ if ( $help $terminator = ( $terminator eq 'CR' ) ? $CR : $CRLF; +# Set perl to expect the same record terminator it is sending +$/ = $terminator; + my ( $sec, $min, $hour, $day, $month, $year ) = localtime(time); $year += 1900; my $transaction_date = "$year$month$day $hour$min$sec"; -- 2.39.5