Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re^2: How to process html script with perl

by bh_perl (Monk)
on Oct 30, 2012 at 03:41 UTC ( #1001451=note: print w/ replies, xml ) Need Help??


in reply to Re: How to process html script with perl
in thread How to process html script with perl


Hi..

I have use MIME::Lite package to sent email

Based on your reply the code will be as below

$msg = MIME::Lite->new( To =>$ToEmail, From =>$FromName, Subject =>$Subject, Type =>'multipart/related' ); $msg->attach( ############################## # Called HTML script here... # ############################## {open (my $fh,"<","sample.html" ) or die $!; local $/ +=undef; <$fh>} ); $msg->attach( Type => 'image/gif', Id => "$Attachment", Path => "$Attachment" );

is it correct ?


Comment on Re^2: How to process html script with perl
Download Code
Replies are listed 'Best First'.
Re^3: How to process html script with perl
by thomas895 (Hermit) on Oct 30, 2012 at 06:51 UTC

    is it correct ?
    Not quite.

    First of all, I feel it needs to be said that HTML is not a scripting language. It is a markup language.

    Next, your open() statement will never work. Why? Because you can't put it in a hashref like that, and still get your expected result. You may also want to see the documentation for MIME::Lite.
    Instead, use something like the following:

    $msg->attach( Type => "text/html", Id => "sample.html", Path => "/path/to/sample.html" );

    ...which should save you some hassle with the files.

    I hope that solves(or at least helps) your question, although I do highly advise you to read perlintro, among others.

    ~Thomas~ 
    "Excuse me for butting in, but I'm interrupt-driven..."

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1001451]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (8)
As of 2015-07-30 00:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (269 votes), past polls