tux007
10.08.06, 03:22
#!/usr/bin/perl -w
use strict;
use Mail::IMAPClient;
my $imap = Mail::IMAPClient->new(Server => "localhost",
User => "cyrus",
Password => "master")
or die "couldn't connect port 143: $!\n";
$imap->create("user.mailuser.irgendwas");
$imap->logout;
Ich hab diesen Fetzen Code ausm Internet gefischt und komme ehrlich gesagt nicht so gut mit perl klar, um ehrlich zu sien bin cih da newbi!
Jedoch stellen sihc mir 2 Fragen:
1. Wenn ich das Script aufrufe, wie kann ich da ein evariablemitgeben? In diesem Fall den namen des Mailaccounts.
2.Wie kann ich die variable im code wieder verwenden? Hier anstatt mailuser einsetzen?
PS: ich wusste nicht so genau wohin mit dem thread, hoffe das ist hier ok! geht ja um cyrus und das ist ein client... ;)
use strict;
use Mail::IMAPClient;
my $imap = Mail::IMAPClient->new(Server => "localhost",
User => "cyrus",
Password => "master")
or die "couldn't connect port 143: $!\n";
$imap->create("user.mailuser.irgendwas");
$imap->logout;
Ich hab diesen Fetzen Code ausm Internet gefischt und komme ehrlich gesagt nicht so gut mit perl klar, um ehrlich zu sien bin cih da newbi!
Jedoch stellen sihc mir 2 Fragen:
1. Wenn ich das Script aufrufe, wie kann ich da ein evariablemitgeben? In diesem Fall den namen des Mailaccounts.
2.Wie kann ich die variable im code wieder verwenden? Hier anstatt mailuser einsetzen?
PS: ich wusste nicht so genau wohin mit dem thread, hoffe das ist hier ok! geht ja um cyrus und das ist ein client... ;)