kako poslati mail iz perla

[ amirko @ 31.10.2004. 10:25 ] @

Dakle pokusvam poslati mail iz perla ali nikako mi nece proraditi:
use Net::SMTP;

$from="[email protected]";
$to="[email protected]";

$smtp = Net::SMTP->new($server);#tu puca kaze"can't call method mail on undefined value" mislim kuzim da se nije uspio spojiti na server al zasto,kad sam ju pokretao bio sam online

$smtp->mail($from);
$smtp->to($to);
$smtp->data();
$smtp->datasend($to);
$smtp->datasend($from );
$smtp->datasend("\n");

$smtp->datasend("ajde proradi........\n");
$smtp->dataend();
$smtp->quit;

zna li netko gdje grijesim,koristim windows XP pro sp1 ,ps mislio sam da je firewall
pa sam ga isključo ali nije ............help???

[ Gojko Vujovic @ 31.10.2004. 10:39 ] @

Jesi li setovao vrednost promenljive $server pre pozivanja Net::SMTP->new()?

[ Mladenko @ 31.10.2004. 13:38 ] @

Pa naravno da ne radi kada nigde nisi postavio $server promenjljivu......

[ Nemanja Jakovljevic @ 31.10.2004. 21:08 ] @

ako si raspolozen za mazohisticku opciju, ja mogu da ti posaljem code sa koriscenjem socketa...

[ amirko @ 01.11.2004. 07:28 ] @

Citat:

Gojko Vujovic: Jesi li setovao vrednost promenljive $server pre pozivanja Net::SMTP->new()?

$server="mail.cmu.carnet.hr" zaboravih jel to setiranje???,svejedno ne radi
Mozes mi to malo pojasniti,pregledavo sam dokumentaciju i nisam našo niš o tome,
kak se to radi,zašto je potrebno.............tek učim ovaj perl ali mogu da kažem mnogo mi se sviđa....Unaprijed Hvala!!

[ Mladenko @ 01.11.2004. 09:09 ] @

Veoma prosto!

Sve sto treba da uradis je da pre svega stavis

Code:

$server = <ime serverapreko koga saljes mail>;

Za ime servera pogledaj svoja podesavanja za mail.

[ amirko @ 02.11.2004. 09:09 ] @

[quote]Mladenko: Veoma prosto!

Sve sto treba da uradis je da pre svega stavis

Code:

$server = <ime serverapreko koga saljes mail>;

moj SMTP server je mail.cmu.carnet.hr

i napravio sam to $server="mail.cmu.carnet.hr"
mislim nisam ga stavio u < ........> ali kaj nije to isto??
ali svejedno neće,pokušao sam sve i svašta ali neče pa neče!
Da nije neš krivo knfigurirano??
Pokušao sam ga ček staviti u virtualni direktorij na ISS pa ga pokretat kao skriptu na serveru, a tamo mi pak javlja CGI ERROR app didn't return ful set of HTTP headers

[ Free_Sex @ 02.11.2004. 11:26 ] @

Pazi ti molim te ... slati email direktno kaceci se na socket.
Mislim to jeste fora, I ja radim slicne stvari onako cisto iz zezancije
I da vidim kako to ide. Ali coveku verovatno treba najlaksi nacin da posalje email
na neku adresu.

Nije specifirano da li obican - text, html, ili oba ? :D

MIME::Lite je modul koji ce ti najlakse odraditi posao, u bilo kojem od ovih slucajeva. Naravno lako je i dodavaje attachmenta i sl. A na server gde ga nema,
ja ga samo prekopiram u direktorijum u kojem je i skripta ( odnosno /MIME/Lite.pm).

Imas naravno na cpan-u da ga skines, a i dokumentacija je (klasicno) odlicna !

Ipak evo primer, copy/paste iz moje skripte.:

Code:

    ...
    use CGI;
    my $q = CGI->new();
    my $f = $q->Vars(); # sad je $f hashref polja iz formulara !
    use MIME::Lite;
    my $msg = MIME::Lite->new(
                 To      => $f->{email},
                 From    => '[email protected],
                 Subject => 'Please confirm your submit',
                 Type    => 'text',
                 Data    => "Tekst emaila ide ovde, moze i kao string naravno."
                 );

    $msg->send();

Dodatak [izmena] :

Takodje u istoj dokumentaciji imas metodu koja podesava kako se salje email. Ako nista ne podesis podrazumeva se sendmail.exe kojeg ti ocigledno nemas. Tako da ima i druga opcija koja se povezuje na smtp. ti samo metodi posaljes adresu smtp-a, a ostatak koda je potpuno isti.

[ Mladenko @ 02.11.2004. 11:46 ] @

Hm, interesantno.....
Kako ne radi? Prijavljuje neku gresku ili se ne desava nista?
Da li si ti lepo instalirao modul?
Koji Perl imas?
Da li si napisao program za Windows ili Linux?

Ako koristis Windows i ActiveState Perl koristi Visual Package Manager da instaliras modul.

Ako imas Linux kucaj "man Net::SMTP" (bez navodnika) da bi dobio vise informacia o koriscenju modula.

[ amirko @ 02.11.2004. 14:41 ] @

> Ovako imam instaliran ActivePerl 5.8 +PerlDevelopmentKit 5.3. oba sam
skinuo sa Active statea,
mislim da je problem u modulu,ali kada pokusam pokrenuti VisualPackageManger
zbloka me kaze da kupim regitrscijski ključ,pokusao sam i preko PPM
pogledati koje module imam instalrane ali on kaže da nemam validnih
repositorija i izbacuje neki "eror 500: Can't connect to
ppm.ActiveState.com:80 (bad protocol 'tcp')
U čemu je kvaka? kako da vidim koje module imam instalirane,mislim u
C:perllib ima ih puno sa extenzijom .pm
to su moduli ili??I kaj je uopće perldevelopment kit kaj tu ne bi trebali
biti moduli>
Može jedan chrash-kurs josh sam novi pa tek proučavam
p.s.koristim windoze XP pro SP1

[ Mladenko @ 03.11.2004. 13:44 ] @

Pazi ovako:

Visual Package Manager dolazi uz Perl Dev Kit sto znaci da moras da imas registraciu da bi ga koristio. Skini crack za svoju verziju sa www.cracks.am i instaliraj. Da bi koristio PPM i Visual Package Manager moras biti na netu.

Perl Dev Kit sluzi za prevodjenje perl skripti u exe fajlove, koji se kasnije mogu koristiti bez Perla jer sve module koje si upotrebio i sve potrebne fajlove strpa u jedan EXE fajl, sto ima dobrih i losih strana. Isto tako Perl Dev Kit prevodi i u MSI (za instalaciju), i pravi sistem trej aplikacije (sto stoje dole kod sata). Procitaj dokumentaciju koja dolazi uz PDK.

Svi moduli imaju extenziju .PM ali njihovo instaliranje je bitno. Nije samo da prekopiras pm fajl u c:perllib (mada i to ponekad radi) nego da se oni i instaliraju. Skini sa Microsoftovog sajta program koji se zove NMAKE (nije veliki) i koristi njega prilikom instalacije modula. Taj program dobijas uz Visual Studio, tako da ako ga imas instaliranog ili znas gde mozes da ga nabavis, ne moras da ga skidas sa neta. Module skidaj sa search.cpan.org sajta i obavezno pogledaj da li su i za Windows posto je vecina njih za Linux. Kada skines NMAKE stavi ga u Enviroment Variables u PATH (to je u Settings -> Control Panel -> System -> Advanced). Posle svaki modul koji skines sa neta instaliras sa:

perl Makefile.pl
nmake
nmake install

to sve kucas u Command Promptu. To ti je to, ukratko. Ako ima jos nekih problema ti reci.

[ amirko @ 03.11.2004. 18:03 ] @

>Hvala Care,jos nesto samo :
Kad ih jednom instaliram to je to,mogu ih koristiti i vise ih ne moram
instalirati ili??
Di oni sebe instaliraju??
p.s.vi ste do jaja,od sad brijem samo po vasim njuzicama,:).!!!

[ Free_Sex @ 03.11.2004. 23:09 ] @

A zar nije mnogo lakse skidati PPM fajlove sa repository-a ?

Inace ... PPM ti dodju vec iskompajlirani, pa ti ne trbe nmake i slicno.
A i dobro je ako modul ima neke komponente napisane u C-u ..

[ Mladenko @ 04.11.2004. 21:31 ] @

Kada ih instaliras, to je to, mozes da ih koristis. Moras da ih instaliras ponovo samo kada ih obrises (sto je logicno). Pazi kada instaliras module, jer se dosta njih oslanjaju na druge module koje takodje moras da instaliras. Moduli idu u c:perlsitelib

[ amirko @ 07.11.2004. 08:44 ] @

> Cao sefe,cuj imam problema s krakovanjem PDK 5.3.0.530 -a,skinuo sam
verziju koja mi treba ali ne znam ju
kreknuti,dobijo sam jedan exe,kad ga pokrenem upisem login i usrname i on mi
izbaci reg broj....
ali gdje da ga upisem,kaze mi startaj perl2exe sa parametrom -registration
ali ja taj file uopce nemam u perl/bin/
tak da nemrem pokrenuti VPM...imas kakvu ideju...?
Hvala
>