Skip to content

Instantly share code, notes, and snippets.

@epaule
Created March 4, 2011 15:56
Show Gist options
  • Save epaule/854857 to your computer and use it in GitHub Desktop.
Save epaule/854857 to your computer and use it in GitHub Desktop.
one liner to compare two wormbase FTP releases
perl -e 'use File::Find;$to=shift();$from=$to-1;find(\&wa,shift());sub wa{$f=$File::Find::name;$f=~s/$from/$to/g;print "cannot find $f\n" unless -e $f}' 224 ~ftp/pub2/wormbase/WS223/
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment