[WIN32] removed ogg/vorbis sources and binaries from our repo

[vuplus_xbmc] / lib / win32 / vorbisfile / libvorbis / vq / auxpartition.pl

diff --git a/lib/win32/vorbisfile/libvorbis/vq/auxpartition.pl b/lib/win32/vorbisfile/libvorbis/vq/auxpartition.pl
deleted file mode 100755 (executable)
index 05c5ed9..0000000
--- a/lib/win32/vorbisfile/libvorbis/vq/auxpartition.pl
+++ /dev/null
@@ -1,71 +0,0 @@
-#!/usr/bin/perl
-
-if($#ARGV<0){
-    &usage;
-}
-
-$|=1;
-
-$bands=0;
-
-foreach $arg (@ARGV){
-    ($entries[$bands],$file[$bands])=split(/,/,$arg);
-    $bands++;
-}
-
-# no time to deal with globs right now
-if($bands>0){
-    die unless open(ONE,"<".$file[0]);
-}
-if($bands>1){
-    die unless open(TWO,"<".$file[1]);
-}
-if($bands>2){
-    die unless open(THREE,"<".$file[2]);
-}
-
-
-while (<ONE>) {    
-    my@nums = ();
-    @nums = split(/,/);
-    my$cols=$#nums;
-    for($i=0;$i<$cols;$i++){
-       print 0+$nums[$i].", ";
-    }
-    if($bands>1){
-       $_=<TWO>;
-       @nums = ();
-       @nums = split(/,/);
-       $cols=$#nums;
-       for($i=0;$i<$cols;$i++){
-           print $nums[$i]+$entries[0].", ";
-       }
-       if($bands>2){
-           $_=<THREE>;
-           @nums = ();
-           @nums = split(/,/);
-           $cols=$#nums;
-           for($i=0;$i<$cols;$i++){
-               print $nums[$i]+$entries[0]+$entries[1].", ";
-           }
-       }
-    }
-    print "\n";
-
-}
-
-if($bands>0){
-    close ONE;
-}
-if($bands>1){
-    close TWO;
-}
-if($bands>2){
-    close THREE;
-}
-    
-sub usage{
-    print "\nOggVorbis auxbook spectral partitioner\n\n";
-    print "auxpartition.pl <part_entries>,file [<part_entries>,file...]\n\n";
-    exit(1);
-}