Sign in
nest-open-source
/
nest-cam
/
4320010
/
curl
/
7e01bdb43756968ec46a7bdb4d65ecf50ae0bb18
/
.
/
curl
/
tests
/
libtest
/
test75.pl
blob: 31cdfb8cc4b65b7cd7da5e89a5da847ff2ce2300 [
file
] [
log
] [
blame
]
#!/usr/bin/env perl
# Check that the length of a given URL is correct
if
(
$
#ARGV != 1 )
{
print
"Usage: $0 string length\n"
;
exit
3
;
}
if
(
length
(
@ARGV
[
0
])
!=
@ARGV
[
1
])
{
print
"Given host IP and port not supported\n"
;
exit
1
;
}
exit
0
;