मुझे एक ईमेल के मुख्य भाग के रूप में एक एक्सएमएल फाइल भेजने की जरूरत है। मैं एक्सएमएल को एक साधारण स्ट्रिंग में कनवर्ट करना चाहता हूं, इसे शरीर में रखना चाहता हूं और फिर ईमेल भेजना चाहता हूं। मुझे याद है कि मैंने फ़ाइल को प्लेनटेक्स्ट के रूप में RichTextBox में लोड करके सी # में पहले किया था।

my $xmlfilename;
my $myxml;
# XML TO STRING?
my $email = Email::Simple->create(
header => [
To      => '"AB <a@b.it"',
From    => '"CD" <c@d.it>',
Subject => "TEST",
],
body => $myxml,
);
sendmail($email);

कोई विचार?

0
raz3r 15 नवम्बर 2011, 14:38

2 जवाब

सबसे बढ़िया उत्तर

यदि आप फ़ाइल से XML डेटा पढ़ते हैं, तो यह एक "सरल स्ट्रिंग" होगी। मुझे यकीन नहीं है कि भ्रम क्या है।

my $xmlfilename;

open my $fh, $xmlfilename or die "Can't open $xmlfilename: $!";

my $myxml = do { local $/; <$fh>; };

my $email = Email::Simple->create(
    header => [
        To      => '"AB <a@b.it"',
        From    => '"CD" <c@d.it>',
        Subject => "TEST",
    ],
    body => $myxml,
);

sendmail($email);
5
Dave Cross 15 नवम्बर 2011, 16:40
my $xmlfilename; 
my $myxml; 
open (FILE, '>', "$xmlfilename") or die "$!";
while (<FILE>){
    $myxml = "$myxml"."$_";  

 }
close (FILE);
my $email = Email::Simple->create( 
header => [ 
    To => '"AB <a@b.it"', 
    From => '"CD" <c@d.it>', 
    Subject => "TEST", 
], 
    body => $myxml, 
); 
    sendmail($email);

या आप चाहें तो xml को पार्स कर सकते हैं http://metacpan.org/pod/XML::Parser मॉड्यूल के साथ

-1
szabgab 7 मई 2014, 11:58