here-document (Allgemeines zu Perl)

[thread]9088[/thread]

here-document

Leser: 1

Gast Gast

2007-06-14 20:26

Hi zusammen,

ich bekomme das nicht zum laufen:

Code: (dl )

#!/usr/bin/perl -w
#use strict;

    print <<EOC=~ s/^\s+//gm;
    echo hi there
    echo lo there
EOC

Tipps?

ciao,
Hans

Code-Tags by betterworld\n\n

renee

2007-06-14 20:42

User since
2003-08-04
14371 Artikel
ModeratorIn

Das wird so nicht gehen...

Ich vermute mal, Du willst so etwas machen:

Code (perl): (dl )

#!/usr/bin/perl

use strict;
use warnings;

my $var = q~
   echo hi there
   echo lo there
~;

$var =~ s/^\s+//gm;
print $var;

Wenn nicht, beschreibe Dein Problem bitte genauer.

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

2007-06-14 21:38

User since
2003-08-04
12208 Artikel
Admin1

das hier geht:

Code: (dl )

(my $foo = <<EOC) =~ s/^\s+//gm;
   echo hi there
   echo lo there
EOC
print $foo;

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

View all threads created 2007-06-14 20:26.