Select Code to Download

#!/usr/bin/perl

...

    print "@a $hex $line\n";
}

#!/usr/bin/perl

...

    symlink $snappath, $label;
}

# Shell script
...

# a simple pipeline. Find is used to generate a filename list
find . | catalog | snap $1 $2