Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic

Re^2: SQL vs Perl table comparing

by roboticus (Chancellor)
on Jul 11, 2013 at 11:46 UTC ( #1043698=note: print w/replies, xml ) Need Help??

in reply to Re: SQL vs Perl table comparing
in thread SQL vs Perl table comparing

Something like this should do:

use DBI; use Spreadsheet::WriteExcel; my $DB=DBI::connect( ... connection args for oracle DB ... ); my $ar = $DB->selectall_arrayref('select * from table'); my $XLWB = Spreadsheet::WriteExcel->new('table.xls'); my $XLWS = $XLWB->add_worksheet('table'); my $row = 0; $XLWS->write_row($row,0,$_) for @$ar;


When your only tool is a hammer, all problems look like your thumb.

Replies are listed 'Best First'.
Re^3: SQL vs Perl table comparing
by runrig (Abbot) on Jul 11, 2013 at 16:41 UTC
    Spreadsheet::WriteExcel is superceeded by Excel::Writer::XLSX.

    But I think the poster wants to avoid putting all the data in a spreadsheet where they currently run macros to compare data 8-) ... and wants you to write a generic table compare utility

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1043698]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (4)
As of 2018-04-21 10:02 GMT
Find Nodes?
    Voting Booth?