Tighten regex for key

2012-02-03 02:51:05 -05:00
parent fcc629ac71
commit 0244fd592f
1 changed files with 1 additions and 1 deletions
@@ -42,7 +42,7 @@ if ( $pid == 0 ) { # child
  LINE: while ( <$pty> ) {
    chomp;
    if ( m{^MOSH CONNECT} ) {
-      if ( ( $port, $key ) = m{^MOSH CONNECT (\d+?) (.{22})} ) {
+      if ( ( $port, $key ) = m{^MOSH CONNECT (\d+?) ([A-Za-z0-9/+]{22})\s*$} ) {
 	last LINE;
      } else {
 	die "Bad MOSH CONNECT string: $_\n";