flashcards

Stupid LaTeX flashcard viewer
git clone git://lumidify.org/flashcards.git (fast, but not encrypted)
git clone https://lumidify.org/flashcards.git (encrypted, but very slow)
git clone git://4kcetb7mo7hj6grozzybxtotsub5bempzo4lirzc3437amof2c2impyd.onion/flashcards.git (over tor)
Log | Files | Refs | README

gen_cache.pl (736B)

      1 #!/usr/bin/env perl
      2 
      3 use strict;
      4 use warnings;
      5 use utf8;
      6 use open qw< :encoding(UTF-8) >;
      7 binmode(STDOUT, ":utf8");
      8 use File::Compare;
      9 use File::Copy;
     10 
     11 if ($#ARGV != 0) {
     12 	die "USAGE: ./gen_cache.pl <path_to_new_flashcards>\n";
     13 }
     14 
     15 my $path = shift;
     16 opendir my $dir, "$path/flashcards/" or die "ERROR: Failed to open flashcard directory!\n";
     17 while (my $filename = readdir($dir)) {
     18 	next if ($filename =~ /\A\.\.?\z/);
     19 	next if (-e "latex/$filename" && compare("latex/$filename", "$path/flashcards/$filename") == 0);
     20 	if (system("./render_card.sh", "$path/flashcards/$filename", "$path/defs.tex") != 0) {
     21 		die "Error processing file $path/flashcards/$filename";
     22 	}
     23 	copy "$path/flashcards/$filename", "latex/$filename";
     24 }
     25 closedir $dir;