add attribute specs to subs

1 files changed, 3 insertions, 3 deletions

diff --git a/net_if b/net_if
index 62d1dab..5b6e845 100755
--- a/net_if
+++ b/net_if
@@ -26,7 +26,7 @@ sub msg ($@) {
     exit $exit;
 }
 
-sub get_if_status {
+sub get_if_status (@) {
     my (@up, @down, @error);
 
     while (@_) {
@@ -60,7 +60,7 @@ sub get_if_status {
     return (\@up, \@down, \@error);
 }
 
-sub get_if_stats {
+sub get_if_stats ($) {
     my $if = shift @_;
     my $stats = {};
 
@@ -84,7 +84,7 @@ sub get_if_stats {
     return $stats;
 }
 
-sub print_stats {
+sub print_stats ($) {
     my ($stats, $count, $perfdata, $if);
     $stats = shift @_;