Skip to content

Instantly share code, notes, and snippets.

@kstep
Created May 20, 2011 13:20
Show Gist options
  • Save kstep/982872 to your computer and use it in GitHub Desktop.
Save kstep/982872 to your computer and use it in GitHub Desktop.
List torrent file
perl -ne 'while (/(?:name|pathl)(\d+):/gc) { $n = $1; /(.{$n})/gc; print "$1\n"; }'
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment