diff options
Diffstat (limited to 'perl/examples/rmount.pl')
| -rwxr-xr-x | perl/examples/rmount.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/examples/rmount.pl b/perl/examples/rmount.pl index eef8ed8..2c50791 100755 --- a/perl/examples/rmount.pl +++ b/perl/examples/rmount.pl @@ -47,7 +47,7 @@ $SIG{CHLD} = sub { connect_remote; sub netlink { - my ($str) = join("\n",map {" $_"} (split("\n",Dumper(\@_))))."\n"; + my ($str) = Dumper(\@_)."\n"; $str = sprintf("%08i\n%s",length($str),$str); while(1) { # retry as necessary my ($sig) = $SIG{ALRM}; |