Arthur Mourão Arthurmourao

Arthurmourao / Client - Socket

Created July 27, 2011 12:21

Um client que envia o conteúdo de um arquivo de texto(ou equivalente) para o server.

	#! /usr/bin/perl

	use IO::Socket::INET;

	$client = IO::Socket::INET->new(
	PeerAddr=>"localhost", # host do server o server está listening
	PeerPort => "8081", # porta em que
	Timeout => 60); # timeout de conexao

	open (FILE,"<","testeSplit.txt");

Arthurmourao / Server - Socket

Created July 27, 2011 12:24

Server que recebe pacotes de um client e os imprime na tela. Falta terminar a implementação de um arquivo de log. Made by VI

	#! /usr/bin/perl


	use IO::Socket::INET;

	print "Server ON";

	$server = IO::Socket::INET->new(
	LocalAddr=>"localhost", # host
	LocalPort=> "8081", # porta que vai ficar em listening

Arthurmourao / Classe Decorada.java

Created December 6, 2011 16:19

	package montadora;

	public abstract class Carros {

	private String description = "Veiculo";
	private String modelN = "Nacional";
	private String modelI = "Importado";

	public void setmodelN(String mNacional) {
	modelN = mNacional;