#!/usr/bin/perl

use warnings;
use strict;
use Spreadsheet::WriteExcel;

my $workbook    = Spreadsheet::WriteExcel->new( 'example.xls' );
my $worksheet   = $workbook->add_worksheet();

my $link_format = $workbook->add_format(
    color      => 'blue',
    underline  => 1,
    num_format => 1,
);

$worksheet->set_column( 'B:B', 20 );

$worksheet->write_url( 'A1', 'www.perl.com', 270751343164, $link_format );
$worksheet->write_url( 'B1', 'www.perl.com', 270751343164, $link_format );

__END__