/[pgestraier]/trunk/data/convert.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/data/convert.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 10 by dpavlin, Wed May 25 23:27:35 2005 UTC revision 16 by dpavlin, Thu May 26 00:16:48 2005 UTC
# Line 50  while(<$t>) { Line 50  while(<$t>) {
50                  $i++;                  $i++;
51                  print "$i ";                  print "$i ";
52                  open(my $t, "> trivia/$i.est") || die "can't open $i.est: $!";                  open(my $t, "> trivia/$i.est") || die "can't open $i.est: $!";
53                  print $t '@title='.$title."\n";                  print $t '@title=', $title, "\n",
54                            '@size=', length($trivia), "\n";
55                  print $t 'qv='.join(",", @qv),"\n" if (@qv);                  print $t 'qv='.join(",", @qv),"\n" if (@qv);
56                  print $t "\n$trivia\n",                  print $t "\n$trivia\n",
57                          ("\t$title\n" x $title_rank),                          ("\t$title\n" x $title_rank),
Legend:
Removed from v.10  
changed lines
  Added in v.16
  ViewVC Help
Powered by ViewVC 1.1.26