Thread Inhalt nur ausgeben wenn ^ kein \n: -> RegEx Problem (13 answers)
Opened by youngalcapone at 2004-01-31 18:58

youngalcapone
 2004-01-31 18:58
#79686 #79686
User since
2003-08-14
185 Artikel
BenutzerIn
[default_avatar]
Aloha!
Ich habe längere Zeit nichts mehr richtiges mit Perl gemacht, jetzt aber wieder angefangen. Und schon hab ich wieder das erste Problem:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
#!/usr/bin/perl
use strict;

open TXT, "../monatshit.txt" or die "$!";
my @txt = <TXT>;
close TXT;

if (@txt !~ /^\n/) {
	print "Content-type: text/html\n\n";
	print "<div class=\"monatshit\">";
	print @txt;
	print "</div>";
}


Dieses Script darf den Inhalt von monatshit.txt nur ausgeben,
wenn das erste Zeichen kein \n ist.
Nur leider funktioniert mein Regulärer Ausdruck nicht....
Ich hoffe ihr könnt mir helfen!
Gruss, Dave

View full thread Inhalt nur ausgeben wenn ^ kein \n: -> RegEx Problem