cassyarduino cassyarduino / UIPEthernet

UIPEthernet library for Arduino IDE, Eclipse with arduino plugin and MBED/SMeshStudio (AVR,STM32F,ESP8266,Intel ARC32,Nordic nRF51,Teensy boards,Realtek Ameba(RTL8195A,RTL8710)), ENC28j60 network chip. Compatible with Wiznet W5100 Ethernet library API. Compiled and tested on Nucleo-F302R8. Master repository is: https://github.com/UIPEthernet/UIPEthernet/

Diff: tests/perl/udpclient.pl

Revision:
0:e3fb1267e3c3
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/perl/udpclient.pl	Wed Dec 21 16:58:10 2016 +0100
@@ -0,0 +1,26 @@
+#!/usr/bin/perl
+#udpclient.pl
+
+use IO::Socket::INET;
+
+# flush after every write
+$| = 1;
+
+my ($socket,$data);
+
+#  We call IO::Socket::INET->new() to create the UDP Socket
+# and bind with the PeerAddr.
+$socket = new IO::Socket::INET (
+PeerAddr   => '192.168.0.6:5000',
+Proto        => 'udp'
+) or die "ERROR in Socket Creation : $!\n";
+#send operation
+$data = "data from client";
+$socket->send($data);
+
+#read operation
+$data = <$socket>;
+print "Data received from socket : $data\n ";
+
+sleep(10);
+$socket->close();