issues are: without adjusting '&', I will get a warning notification and the url won't work in the Excel. the email attachment won't work at all for my configurations with MIME::Lite. I am using perl 5.8.8 (servers are RHEL 5.8 or 6.2). Excel::Writer::XLSX version 0.51, MIME::Lite version 3.027. A sample is shown below, many thanks.
#!/usr/bin/perl
use strict;
use warnings;
use Excel::Writer::XLSX;
use MIME::Lite;
my $report_file = 'hyperlink.xlsx';
# Create a new workbook and add a worksheet
my $workbook = Excel::Writer::XLSX->new($report_file);
my $worksheet = $workbook->add_worksheet('Hyperlinks');
# Add the standard url link format.
my $url_format = $workbook->add_format(
color => 'blue',
underline => 1,
);
$worksheet->write( 'A1', 'Some Content');
$worksheet->write( 'A3', 'http://www.perl.com/?a=1&b=2', $url_format,
+'Perl home with query string' );
$workbook->close();
my $msg = MIME::Lite->new(
From => 'noreply@example.com',
To => 'you@example.com',
Subject => "Testing Report - 2012-09-27",
Type => 'multipart/mixed'
);
$msg->attach(
Type => 'text/plain',
Data => 'This is a testing email',
);
$msg->attach(
#Type => 'AUTO',
#Type => 'application/vnd.ms-excel',
Type => 'application/vnd.openxmlformats-officedocument.spre
+adsheetml.sheet',
Path => $report_file,
Disposition => 'attachment',
);
$msg->send();
__END__