X-Git-Url: https://git.octo.it/?a=blobdiff_plain;f=src%2Fperl.c;fp=src%2Fperl.c;h=541826fb6eb04a2746904f2bcd441f0ec42a6e75;hb=10075e6fe3c384b73c2dd398a1435f8d10e56654;hp=3a56da624c1c12489fab32cb757220cb616f6a7a;hpb=2c8470d917b2f0a17326ee1336081dcffbd6a347;p=collectd.git

diff --git a/src/perl.c b/src/perl.c
index 3a56da62..541826fb 100644
--- a/src/perl.c
+++ b/src/perl.c
@@ -567,7 +567,7 @@ static int pplugin_dispatch_values (pTHX_ HV *values)
 		sstrncpy (list.host, SvPV_nolen (*tmp), sizeof (list.host));
 	}
 	else {
-		strcpy (list.host, hostname_g);
+		sstrncpy (list.host, hostname_g, sizeof (list.host));
 	}
 
 	if (NULL != (tmp = hv_fetch (values, "plugin", 6, 0)))