#!/bin/sh
#! -*- perl -*-
eval 'exec $PERLLOCATION/bin/perl -x $0 ${1+"$@"} ;'
 if 0;

opendir(CURRDIR, ".") or die "Cannot open current directory: $!";
foreach my $file (readdir(CURRDIR)) {
	next if ($file !~ /\.rib$/);
	system 'render', $file;
}
closedir CURRDIR;