version 1.123, 2003/07/17 07:59:14
|
version 1.125, 2003/12/11 04:50:35
|
Line 1249 sub PrintField {
|
Line 1249 sub PrintField {
|
$value =~ s/<[\/\w]*?>//sg; |
$value =~ s/<[\/\w]*?>//sg; |
} else { |
} else { |
$value =~ s/^\s+/<br> /mg; |
$value =~ s/^\s+/<br> /mg; |
|
$value =~ s/(\s+)-+(\s+)/$1–$2/mg; |
|
$value =~ s/\s+\–/ \–/mg |
|
if $value !~ /^\|/; |
$value =~ s/^\|([^\n]*)/<pre>$1<\/pre>/mg; |
$value =~ s/^\|([^\n]*)/<pre>$1<\/pre>/mg; |
$value =~ s/\s+-+\s+/ – /mg; |
|
$value =~ s/(http:\/\/\S+[^\s\)\(\,\.])/<a href="$1">$1<\/a>/g if $header !~ /^αΧΤΟ/; |
$value =~ s/(http:\/\/\S+[^\s\)\(\,\.])/<a href="$1">$1<\/a>/g if $header !~ /^αΧΤΟ/; |
# $value =~ s/(http:\/\/(?:\w+.)+[\w\\\~]+(\?[^\s.]+)?)/<a href="$1">$1<\/a>/g if $header !~ /^αΧΤΟ/; |
# $value =~ s/(http:\/\/(?:\w+.)+[\w\\\~]+(\?[^\s.]+)?)/<a href="$1">$1<\/a>/g if $header !~ /^αΧΤΟ/; |
# $value =~ s/(\s)"/$1“/mg; |
# $value =~ s/(\s)"/$1“/mg; |
Line 1876 MAIN:
|
Line 1878 MAIN:
|
exit |
exit |
} |
} |
|
|
if ($tour && (!param('answers')||!param('answers')<=1)) |
if ($tour && !param('qnumber') && (!param('answers')||(param('answers')<=1))) |
{ |
{ |
my $n=param('tour'); |
my $n=param('tour'); |
$n=~s/.txt$//; |
$n=~s/.txt$//; |
Line 2138 EOT
|
Line 2140 EOT
|
# FROM Tournaments as t1, Tournaments as t2 |
# FROM Tournaments as t1, Tournaments as t2 |
# WHERE t1.CreatedAt>$d AND t2.ParentId=t1.Id GROUP BY t1.Id"); |
# WHERE t1.CreatedAt>$d AND t2.ParentId=t1.Id GROUP BY t1.Id"); |
my ($sth) = $dbh->prepare("SELECT t1.Id, t1.FileName, t1.Type, count(t2.Id) FROM Tournaments as t1 LEFT JOIN Tournaments as t2 |
my ($sth) = $dbh->prepare("SELECT t1.Id, t1.FileName, t1.Type, count(t2.Id) FROM Tournaments as t1 LEFT JOIN Tournaments as t2 |
ON t2.ParentId=t1.id WHERE t1.CreatedAt>$d GROUP BY t1.Id"); |
ON t2.ParentId=t1.id WHERE t1.CreatedAt>=$d GROUP BY t1.Id"); |
$sth->execute; |
$sth->execute; |
my ($Id,$fname,$type,$c); |
my ($Id,$fname,$type,$c); |
while (($Id,$fname,$type,$c)=$sth->fetchrow,$Id) { |
while (($Id,$fname,$type,$c)=$sth->fetchrow,$Id) { |