Groan. Even after I refreshed my memory with perlvar(1), I still managed
to typo my way through.
This commit is contained in:
parent
56b6822e2f
commit
a0b04e366e
@ -1,6 +1,6 @@
|
||||
#!/usr/bin/perl
|
||||
|
||||
# $OpenBSD: portslogger,v 1.7 2001/11/11 12:38:57 espie Exp $
|
||||
# $OpenBSD: portslogger,v 1.8 2001/11/11 12:57:25 espie Exp $
|
||||
# Copyright (c) 2001 Marc Espie. All rights reserved.
|
||||
# Redistribution and use in source and binary forms, with or without
|
||||
# modification, are permitted provided that the following conditions
|
||||
@ -81,7 +81,7 @@ sub DESTROY
|
||||
}
|
||||
}
|
||||
|
||||
if (@ARG < 1) {
|
||||
if (@ARGV < 1) {
|
||||
print STDERR "Usage: $0 directory\n";
|
||||
exit 1;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user