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, 3506 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
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(2)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Windows Netzwerk
Windows 10 RDP geht nicht (18)

Frage von Fiasko zum Thema Windows Netzwerk ...

Windows Server
gelöst Active Directory CA öffentlich vertrauenswürdig machen, geht das? (2)

Frage von DeathangelCH zum Thema Windows Server ...

C und C++
gelöst Anzahl der Buchstaben in einem String Element Array C++ (3)

Frage von Protected zum Thema C und C ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
gelöst Server erkennt Client nicht wenn er ausserhalb des DHCP Pools liegt (28)

Frage von Mar-west zum Thema LAN, WAN, Wireless ...

Windows Server
Server 2008R2 startet nicht mehr (Bad Patch 0xa) (18)

Frage von Haures zum Thema Windows Server ...

Outlook & Mail
Outlook 2010 findet ost datei nicht (18)

Frage von Floh21 zum Thema Outlook & Mail ...