--- a/bin/send_a.test	Tue Jan 29 09:48:10 2013 +0100
+++ b/bin/send_a.test	Tue Jan 29 14:06:27 2013 +0100
@@ -6,27 +6,27 @@
 require CGI;
 require CGI::Carp qw(fatalsToBrowser);
 
-my ($cgi, $firma, $mail, $text, $url, $ua, $req);
+my ( $cgi, $firma, $mail, $text, $url, $ua, $req );
 $cgi = new CGI;
 
 # Auswerten der Daten.
 #$firma=$cgi->param('Firma');
 #$mail=$cgi->param('Mail');
 #$text=$cgi->param('Text');
-my @param=$cgi->param();
-open(TEST,">test");
+my @param = $cgi->param();
+open( TEST, ">test" );
 print TEST ("@param");
 close TEST;
 
 exit(0)
 
-#$url='http://192.168.0.144/cgi-bin/recieve';
+  #$url='http://192.168.0.144/cgi-bin/recieve';
 
-#$ua=LWP::UserAgent->new;
-#$ua->env_proxy;
+  #$ua=LWP::UserAgent->new;
+  #$ua->env_proxy;
 
-#$req=HTTP::Request->new("POST",$url);
-#$req->header('Content-Type' => 'text/html');
-#$req->content('Firma=Wir&Mail=mail');
+  #$req=HTTP::Request->new("POST",$url);
+  #$req->header('Content-Type' => 'text/html');
+  #$req->content('Firma=Wir&Mail=mail');
 
-#$ua->request($req);
+  #$ua->request($req);