Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

String über Socket senden und empfangen geht nicht

Frage Entwicklung Perl

Mitglied: WINFO2105

WINFO2105 (Level 1) - Jetzt verbinden

29.04.2010, aktualisiert 22:59 Uhr, 3538 Aufrufe

Hi,
und zwar hab ich mir 2 Scripte geschrieben das eine liegt auf den Server und das andere auf meinem Laptop. Ich möchte das ich über das Laptopscript mit infos über meinen Server ausgeben lassen kann. Bis jetzt ist nur "status" implementier, dieses soll mir nur sagen das script läuft.Aber irgendwie haut das mit dem send() und recv() eines strings nicht hin.
Vllt hat jemand von euch ne idee.
Das Serverseitige Script:
#!/usr/bin/perl -w

use strict;
use IO::Socket;

my $server_port = "11111";

my $server = IO::Socket::INET->new (LocalPort => $server_port,
Type => SOCK_STREAM,
Reuse => 1,
Listen => SOMAXCONN)
or die "Keine Verbindung an Port: $server_port möglich: $@\n";



while (defined(my $client = $server -> accept)){

my $status = "Script is online!";



my $empfang;
$server ->recv($empfang, 10000) or die "Konnte nicht empfangen: $!\n";

my $befehl = $empfang;

if($befehl eq 'status'){
$server ->send($status) or die "Konnte nicht senden: $!\n";
}
}
__________________
Und hier das Clientseitige Script:
#!/usr/bin/perl -w

use strict;
use IO::Socket;

my $inet_port = "11111";
my $inet_addr = "localhost";

my $client = IO::Socket::INET->new (PeerAddr => $inet_addr,
PeerPort => $inet_port,
Type => SOCK_STREAM)
or die "Keine Verbindung zu $inet_addr:$inet_port möglich: $!\n";



print ">";
my $eingabe = <>;
my $empfang;
chomp $eingabe;

if($eingabe eq 'status'){
$client -> send($eingabe) or die "Konnte nicht senden: $!\n";
$client -> recv($empfang, 10000) or die "Konnte nicht empfangen: $!\n";
print "$empfang";
}
else{
print "falsche eingabe";
}


Fürhilfe wär ich dankbar....

Gruß Winfo
Ähnliche Inhalte
Outlook & Mail
gelöst Thunderbird Senden an E-Mail-Empfänger (3)

Frage von DasWombat1993 zum Thema Outlook & Mail ...

Windows 7
Windows 7 "Senden an - E-Mail-Empfänger" funktioniert nicht (3)

Frage von Falaffel zum Thema Windows 7 ...

Linux
gelöst Php redis an Socket binden? (2)

Frage von FA-jka zum Thema Linux ...

Linux
Owncloud redis Memory Caching nicht über socket?

Frage von FA-jka zum Thema Linux ...

Neue Wissensbeiträge
Linux Netzwerk

Ping und das einstellbare Bytepattern

(1)

Erfahrungsbericht von LordGurke zum Thema Linux Netzwerk ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(3)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Microsoft Office
Office Druck fehler (18)

Frage von DaistwasimBusch zum Thema Microsoft Office ...

Netzwerkmanagement
Windows Server 2008 R2: "netsh reset" nicht verfügbar? (11)

Frage von RickTucker zum Thema Netzwerkmanagement ...

Festplatten, SSD, Raid
Uninitialisierte Festplatte - Daten retten (11)

Frage von peterla zum Thema Festplatten, SSD, Raid ...

Microsoft Office
Outlook 2016 in Ordneransicht starten - GPO (9)

Frage von D-Line zum Thema Microsoft Office ...