[linux] Re: SMTP conversatie in Perl

[Hugo van der Kooij]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Martijn van Oosterhout wrote:
| On Sat, Jan 12, 2008 at 02:23:07PM +0100, Hugo van der Kooij wrote:
|> Klopt mijn aanname dat ik iets dergelijks kan doen:
|>
|> 	use IO::Socket;
|> 	my $sock = new IO::Socket::INET (
|> 		PeerAddr => 'remoteserver',
|> 		PeerPort => '25',
|> 		Proto => 'tcp',
|> 	);
|> 	die "Error: $!\n" unless $sock;
|>
|> 	$answer=<$sock>;
| Je moet de protocol specificatie beter lezen. De berichten die terug
| komen van de server kunnen meer dan een regel zijn. Je moet blijven
| doorlezen totdat je geen continuatie regel krijgt (van de vorm nnn- as
| ik mij goed herinner).
|
| Het is misschien ook zinvol om CPAN af te zoeken, er is vast van een
| module dat precies doet wat je wil...

Het issue is meer dat e.e.a. blijft plakken. En dat de SMTP box waar ik
mee test de strikte naleving van de RFC doet en dus \n al niet pikt
omdat ik daar \r\n had moeten doen.

Wat wel werkt is een while loop waarbinnen elke regel bekeken wordt en
waarin elke step beoordeeld wordt.

Skippen van de extra regels is daarbij ook geen punt. regex: ^[0-9]{3}-

De waarschijnlijkheid dat ik echter een continuation tegenkom voor deze
testen terwijl e.e.a. goed gaat is echter astronomisch klein.

Ik heb e.e.a. in elkaar zodat ik precies kan meten hoelang een delivery
duurt. Nu nog de ontvangende kant koppelen en ik kan het hele circus meten.

Hugo.

- --
hvdkooij op vanderkooij.org               http://hugo.vanderkooij.org/
PGP/GPG? Use: http://hugo.vanderkooij.org/0x58F19981.asc

	A: Yes.
	>Q: Are you sure?
	>>A: Because it reverses the logical flow of conversation.
	>>>Q: Why is top posting frowned upon?

Bored? Click on http://spamornot.org/ and rate those images.

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.7 (GNU/Linux)

iD8DBQFHiODSBvzDRVjxmYERAl/rAKCegH3DLPaM0xBYoPbwtJVs2eS8wgCghL7p
O5NZc5AJHYC2dWO35ulfd5Q=
=V8uY
-----END PGP SIGNATURE-----