Mercurial > cortex
view thesis/comp.pl @ 558:830dc2e426b6
time for another run!
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Fri, 02 May 2014 15:18:52 -0400 |
parents | f14fa9e5b67f |
children |
line wrap: on
line source
1 #!/usr/bin/env perl3 use List::Flatten;5 $target = shift(@ARGV);7 $frames = shift(@ARGV);9 @numbers = split(/,/, $frames);10 @images = map {sprintf("$target/%07d.png", $_)} @numbers;13 $output = $target.".png";15 @imagemagick_command = flat("montage", @images, "-geometry", "+2+2", $output);17 print "@imagemagick_command\n";19 system(@imagemagick_command);