summaryrefslogtreecommitdiffstats
path: root/abs/mv-core/ghosd/osdClient.pl
diff options
context:
space:
mode:
authorJames Meyer <james.meyer@operamail.com>2010-10-23 18:17:40 (GMT)
committerJames Meyer <james.meyer@operamail.com>2010-10-23 18:19:39 (GMT)
commitadbcf19958300e9b6598990184c8815b945ba0ee (patch)
treef4283c850ac0ac202c17e78a637ee7ca8147621b /abs/mv-core/ghosd/osdClient.pl
parent61a68250df10d29b624650948484898334ff22d0 (diff)
downloadlinhes_pkgbuild-adbcf19958300e9b6598990184c8815b945ba0ee.zip
linhes_pkgbuild-adbcf19958300e9b6598990184c8815b945ba0ee.tar.gz
linhes_pkgbuild-adbcf19958300e9b6598990184c8815b945ba0ee.tar.bz2
Removed old core and extra from repo. Renamed -testing to core/extra. This will setup the base for the testing branch.
Diffstat (limited to 'abs/mv-core/ghosd/osdClient.pl')
-rwxr-xr-xabs/mv-core/ghosd/osdClient.pl25
1 files changed, 0 insertions, 25 deletions
diff --git a/abs/mv-core/ghosd/osdClient.pl b/abs/mv-core/ghosd/osdClient.pl
deleted file mode 100755
index 06fc381..0000000
--- a/abs/mv-core/ghosd/osdClient.pl
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/usr/bin/perl -w
-# osdClient.pl - send simple client text to server
-
-use strict;
-use IO::Socket::INET;
-use POSIX qw(F_GETFL F_SETFL O_NONBLOCK);
-my $sock = "";
-
-if( $#ARGV != 2 ){ die "specify a ip, port, text string" }
-
-eval
-{
- $sock = IO::Socket::INET->new(
- PeerAddr => $ARGV[0],
- PeerPort => $ARGV[1]) || die "can't set it up $!";
-
- $sock->blocking(0)
-};
-
-if( $@ =~ /socket/i )
-{
- print "die in record retrieval socket setup with $@";
-}
-
-print $sock "$ARGV[2] \n";