[Minor] Use three argument open

Fixes tidyall check.

diff --git a/utils/asn.pl b/utils/asn.pl
index 0854ae5f761039a35003dd50aff93e35daf76db2..d78277459a1a7387f015ad9432f9b565cebe46d0 100644 (file)
--- a/utils/asn.pl
+++ b/utils/asn.pl
@@ -145,7 +145,7 @@ foreach my $u ( @{ $config{'bgp_sources'} } ) {
           F_ORIGIN => 7,
         };
 
-        open(my $bgpd, "bgpdump -v -M $fname |") or die "can't start bgpdump: $!";
+        open(my $bgpd, '-|', "bgpdump -v -M $fname") or die "can't start bgpdump: $!";
 
         while (<$bgpd>) {
             chomp;