Permalink
Browse files

Added -q 2 to all nc commands. Need to rewrite to avoid nc

  • Loading branch information...
1 parent a2f3866 commit e62a0ba07e27d1d54490825e5d802f2ec57568c1 @deweysasser deweysasser committed Dec 2, 2011
@@ -38,7 +38,7 @@ sub main {
if($Config{graphiteHost}) {
my ($host, $port) = split(/:/, $Config{graphiteHost});
$port = 2003 unless $port;
- open($graphite, "|nc $host $port") || die("Failed to netcat to $host:$port: $!");
+ open($graphite, "|nc -q 2 $host $port") || die("Failed to netcat to $host:$port: $!");
select $graphite;
}
View
@@ -50,7 +50,7 @@ sub main {
if($Config{graphiteHost}) {
my ($host, $port) = split(/:/, $Config{graphiteHost});
$port = 2003 unless $port;
- open($graphite, "|nc $host $port") || die("Failed to netcat to $host:$port: $!");
+ open($graphite, "|nc -q 2 $host $port") || die("Failed to netcat to $host:$port: $!");
select $graphite;
}
@@ -64,7 +64,7 @@ sub main {
if($Config{graphite}) {
my ($host, $port) = split(/:/, $Config{graphite});
$port = 2003 unless $port;
- open($graphite, "| nc $host $port") || die("Failed to write to netcat $host:$port : $!");
+ open($graphite, "| nc -q 2 $host $port") || die("Failed to write to netcat $host:$port : $!");
select $graphite;
}
View
@@ -24,7 +24,7 @@ unless(GetOptions(
sub main {
my $graphite;
if($Config{graphite}) {
- open($graphite, "|nc $Config{graphite} 2003") || die("Failed to netcat to $Config{graphite}: $!");
+ open($graphite, "|nc -q 2 $Config{graphite} 2003") || die("Failed to netcat to $Config{graphite}: $!");
select $graphite;
}
View
@@ -32,7 +32,7 @@ sub main {
my $graphite;
if($Config{graphite}) {
- open($graphite, "|nc $Config{graphite} 2003") || die("Failed to netcat to $Config{graphite}: $!");
+ open($graphite, "|nc -q 2 $Config{graphite} 2003") || die("Failed to netcat to $Config{graphite}: $!");
select $graphite;
}
@@ -44,7 +44,7 @@ sub main {
if($Config{graphiteHost}) {
my ($host, $port) = split(/:/, $Config{graphiteHost});
$port = 2003 unless $port;
- open($graphite, "|nc $host $port") || die("Failed to netcat to $host:$port: $!");
+ open($graphite, "|nc -q 2 $host $port") || die("Failed to netcat to $host:$port: $!");
select $graphite;
}

0 comments on commit e62a0ba

Please sign in to comment.