MySQL: Zeilenumbruch nach Semikolon

[Matti Maekitalo]

use Mosche;

Unelegant finde ich es hingegen, SQL-Statements "mitten in den Perl-Code" zu schreiben... ich brauchte einen Moment um zu begreifen, dass Dein Code syntaktisch korrekt ist.

Für mich sieht diese Methode schöner aus, als einen String ohne here-Document zu benutzen, gerade wenn ich lange SQL Statements habe.

my $sth = $dbh->prepare("SELECT t1.col1, t1.col2, t1.col3, t1.col4, t2.col1 FROM table1 t1, table2 t2 WHERE t1.id = t2.id ORDER BY t1.col1 DESC, t2.col2, LIMIT 15 OFFSET 40");

finde ich häßlicher als

my $sth = $dbh->prepare(<<EOF);
   SELECT t1.col1, t1.col2, t1.col3, t1.col4, t2.col1
   FROM table1 t1, table2 t2
   WHERE t1.id = t2.id
   ORDER BY t1.col1 DESC, t2.col2,
   LIMIT 15 OFFSET 40
EOF

Oder meinst du etwas ganz anderes. Wie schreibst du denn dein SQL in deinen Code?

use Tschoe qw(Matti);