Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris

Re: Need help to correct a simple script

by space_monk (Chaplain)
on Jan 07, 2013 at 15:57 UTC ( #1012052=note: print w/ replies, xml ) Need Help??

in reply to Need help to correct a simple script

I like to write complex SQL statements as HEREDOCs, as removing the Perl syntax from within the SQL syntax makes for much easier reading...

i.e. it is much easier to read your CREATE TABLE statement when written as....

my $sql = <<EOF; CREATE TABLE test_data$count( id PRIMARY KEY, group_id NOT NULL, created_at NOT NULL, text NOT NULL) AS SELECT rownum, MOD(rownum, 5), TO_DATE('1-jan-07', 'dd-mon-yy') + INTERVAL ' +1' MINUTE * rownum, CAST ('xyz' || rownum AS VARCHAR2(50)) FROM dual CONNECT BY LEVEL <= $rows EOF
This incorporates martos suggestions above, and I'll update if anyone spots any other issues.

A Monk aims to give answers to those who have none, and to learn from those who know more.

Comment on Re: Need help to correct a simple script
Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (5)
As of 2015-10-10 20:15 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (258 votes), past polls