(SHARE) MENGATASI ERROR BUKA YOUTUBE

meunara.net

pak kapten numpang tanya lagi donk…..
gambar di bawah itu youtube nya kok aneh ya..., ada 2 buah youtube yang berjalan dalam 1 halaman, awal nya saya kira mungkin flash player atau mozilla nya yang error, saya coba uninstal keduanya dan instal ulang tapi tetap aja kayak gitu..., di coba lewat google chrome juga seperti itu..., tidak semua video, hanya beberapa jenis video saja, kira" asal masalah itu dari mana pak?

![2 youtube dalam 1 halaman.JPG](/public/imported_attachments/1/2 youtube dalam 1 halaman.JPG)
![2 youtube dalam 1 halaman.JPG_thumb](/public/imported_attachments/1/2 youtube dalam 1 halaman.JPG_thumb)

askar

@meunara.net:

Udah dilakukan semua
baik ganti storeurl.plnya dengan yang dari http://pastebin.com/e3TUtigH
dan juga yg diubah dengan

youtube All itag (semua resolusi)

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){
@itag = m/&?/;
@id = m/&?/;
@range = m/&?/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

Tp masih error gan,
Bahkan youtubenya jlan, eh tengah jalan berhenti n ngulang terus dr awal

Mohn pencerahan
tq

izin ngebantu ya mas askar…
storeurl.pl saya yang sudah saya ubah seperti panduan kanda-kanda senior dan tidak mengalami error

#!/usr/bin/perl

$Rev$

by chudy_fernandez@yahoo.com

Youtube updates at http://wiki.squid-cache.org/ConfigExamples/DynamicContent/YouTube/Discussion

$|=1;
while (<>) {
@X = split;

$X[1] =~ s/&sig=.*//;

$x = $X[0] . " ";
$_ = $X[1];
$u = $X[1];

#photos-X.ak.fbcdn.net where X a-z
if (m/^http://photos-[a-z]?(.ak.fbcdn.net.*)/) {
print $x . "http://photos" . $1 . "\n";

#maps.google.com
} elsif (m/^http://(khm|mt)[0-9]?(.google.com.*)/) {
print $x . "http://" . $1 . $2 . "\n";

#ini untuk cache partial
} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com).?(id=[a-zA-Z0-9]).?&(range=[0-9])./) {
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $2 . $3 . "\n";

# compatibility for old cached get_video?video_id
} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com).?(videoplayback?id=.?|video_id=.?)&(.*?)/) {
$z = $2; $z =~ s/video_id=/get_video?video_id=/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $z . "\n";

# youtube All itag (semua resolusi)
} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){
@itag = m/&?/;
@id = m/&?/;
@range = m/&?/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

} elsif (m/^http://www.google-analytics.com/__utm.gif?.*/) {
print $x . "http://www.google-analytics.com/__utm.gif\n";

#Cache High Latency Ads
} elsif (m/^http://([a-z0-9.])(.doubleclick.net|.quantserve.com|.googlesyndication.com|yieldmanager|cpxinteractive)(.)/) {
$y = $3;$z = $2;
for ($y) {
s/pixel;./pixel/;
s/activity;./activity/;
s/(imgad[^&])./\1/;
s/;ord=[?0-9]//;
s/;×tamp=[0-9]//;
s/[&?]correlator=[0-9]//;
s/&cookie=[^&]//;
s/&ga_hid=[^&]//;
s/&ga_vid=[^&]//;
s/&ga_sid=[^&]*//;

s/&prev_slotnames=[^&]*//

s/&u_his=[^&]*//;

s/&dt=[^&]//;
s/&dtd=[^&]//;
s/&lmt=[^&]//;
s/(&alternate_ad_url=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/(&url=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/(&ref=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/(&cookie=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/[;&?]ord=[?0-9]//;
s/[;&]mpvid=[^&;]//;
s/&xpc=[^&]//;

yieldmanager

s/?clickTag=[^&]//;
s/&u=[^&]//;
s/&slotname=[^&]//;
s/&page_slots=[^&]//;
}
print $x . "http://" . $1 . $2 . $y . "\n";

#cache high latency ads
} elsif (m/^http://(.?)/(ads)?(.?)/) {
print $x . "http://" . $1 . "/" . $2 . "\n";

} elsif (m/^http://(www.ziddu.com..[^/]{3,4})/(.?)/) {
print $x . "http://" . $1 . "\n";

#cdn, varialble 1st path
} elsif (($u =~ /filehippo/) && (m/^http://(.?).(.?)/(.?)/(.).([a-z0-9]{3,4})(?.*)?/)) {
@y = ($1,$2,$4,$5);
$y[0] =~ s/[a-z0-9]{2,5}/cdn./;
print $x . "http://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "\n";

#rapidshare
} elsif (($u =~ /rapidshare/) && (m/^http://(([A-Za-z]+[0-9-.]+)?)([a-z].[^/]{3}/[a-z]/[0-9])/(.*?)/([^/?&]{4,})$/)) {
print $x . "http://cdn." . $3 . "/SQUIDINTERNAL/" . $5 . "\n";

} elsif (($u =~ /maxporn/) && (m/^http://([^/]?)/(.?)/([^/]?)(?.)?$/)) {
print $x . "http://" . $1 . "/SQUIDINTERNAL/" . $3 . "\n";

#domain/path/./path/filename
} elsif (($u =~ /fucktube/) && (m/^http://(.?)(.[^.-]?[^/]/[^/])/(.)/([^/])/([^/?&]).([^/?&]{3,4})(?.*?)$/)) {
@y = ($1,$2,$4,$5,$6);
$y[0] =~ s/(([a-zA-A]+[0-9]+(-[a-zA-Z])?$)|([^.]cdn[^.])|([^.]cache[^.]))/cdn/;
print $x . "http://" . $y[0] . $y[1] . "/" . $y[2] . "/" . $y[3] . "." . $y[4] . "\n";

#like porn hub variables url and center part of the path, filename etention 3 or 4 with or without ? at the end
} elsif (($u =~ /tube8|pornhub|xvideos/) && (m/^http://(([A-Za-z]+[0-9-.]+)?(.[a-z])?).([a-z][0-9]?.[^/]{3}/[a-z])(.?)((/[a-z])?(/[^/]){4}.[^/?]{3,4})(?.)?$/)) {
print $x . "http://cdn." . $4 . $6 . "\n";

#for yimg.com video
} elsif (m/^http://(.yimg.com)//(.)/([^/?&]/[^/?&].[^/?&]{3,4})(?.*)?$/) {
print $x . "http://cdn.yimg.com//" . $3 . "\n";

#for yimg.com doubled
} elsif (m/^http://(.?).yimg.com/(.?).yimg.com/(.?)?(.)/) {
print $x . "http://cdn.yimg.com/" . $3 . "\n";

#for yimg.com with &sig=
} elsif (m/^http://([^.]).yimg.com/(.)/) {
@y = ($1,$2);
$y[0] =~ s/[a-z]+([0-9]+)?/cdn/;
$y[1] =~ s/&sig=.*//;
print $x . "http://" . $y[0] . ".yimg.com/" . $y[1] . "\n";

#youjizz. We use only domain and filename
} elsif (($u =~ /media[0-9]{1,5}.youjizz/) && (m/^http://(.?)(.[^.-]?.[^/])/(.)/([^/?&]).([^/?&]{3,4})(?.?)$/)) {
@y = ($1,$2,$4,$5);
$y[0] =~ s/(([a-zA-A]+[0-9]+(-[a-zA-Z])?$)|([^.]cdn[^.])|([^.]cache[^.]))/cdn/;
print $x . "http://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "\n";

#general purpose for cdn servers. add above your specific servers.
} elsif (m/^http://([0-9.]?)//(.?).(.)?(.?)/) {
print $x . "http://squid-cdn-url//" . $2 . "." . $3 . "\n";

spicific extention

} elsif (m/^http://(.?).(jp(e?g|e|2)|gif|png|tiff?|bmp|ico|flv|wmv|3gp|mp(4|3)|exe|msi|zip|on2|mar|swf).?/) {

@y = ($1,$2);

$y[0] =~ s/((cache|cdn)[-\d])|([a-zA-A]+-?[0-9]+(-[a-zA-Z])?)/cdn/;

print $x . "http://" . $y[0] . "." . $y[1] . "\n";

#generic http://variable.domain.com/path/filename."ex", "ext" or "exte"
#http://cdn1-28.projectplaylist.com
#http://s1sdlod041.bcst.cdn.s1s.yimg.com
} elsif (m/^http://(.?)(.[^.-]?..?)/([^?&=]).([\w\d]{2,4})??.$/) {
@y = ($1,$2,$3,$4);
$y[0] =~ s/([a-z][0-9][a-z]dlod[\d]{3})|((cache|cdn)[-\d])|([a-zA-A]+-?[0-9]+(-[a-zA-Z]*)?)/cdn/;
print $x . "storeurl://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "\n";

all that ends with ;

} elsif (m/^http://(.?)/(.?);(.*)/) {
print $x . "http://" . $1 . "/" . $2 . "\n";

} else {
print $x . $_ . "\n";
}
}

saya tidak mengcopas semua storeurl.pl dari web http://pastebin.com/e3TUtigH melain kan hanya mengambil settingan youtube saja…

Perubahan storeurl.pl ini, ada ga pengaruhnya dengan Dual WAN. Apa sbenarnya fungsi storeurl.pl ini?
misalnya berpengaruh pada akses game
Karena saya pake Dual WAN,
WAN === Browsing, download, dll
OPT === Game

Msalah youtube, untuk sementara blm ada kendala, sy pake punya mas yg di atas.
soalnya setelah saya ubah, kok ada pengaruh ke game, saat download ato lainnya. khususnya game lost saga.

Terima kasih.

kaptenhook

@meunara.net:

pak kapten numpang tanya lagi donk…..
gambar di bawah itu youtube nya kok aneh ya..., ada 2 buah youtube yang berjalan dalam 1 halaman, awal nya saya kira mungkin flash player atau mozilla nya yang error, saya coba uninstal keduanya dan instal ulang tapi tetap aja kayak gitu..., di coba lewat google chrome juga seperti itu..., tidak semua video, hanya beberapa jenis video saja, kira" asal masalah itu dari mana pak?

ditempat saya biasa saja, tidak seperti punya anda, tetep hanya ada 1 youtube, sudah saya coba dengan jenis lagu yang sama juga tetep munculnya hanya satu

meunara.net

owh…, berarti kesalahan dari media pemutar nya ini......

kaptenhook

dicoba saja dulu dengan memperbarui file pfsense.tgz.bak nya dulu, kemudian di edit storeurl.pl nya hasilnya gimana

pfz

@kaptenhook:

@detrackmx:

@meunara.net:

lapor pak kapten….. youtube vevo terhit dengan baik..., WAN disuruh diam, kata LAN kepada WAN biarkan anak buah yang bermain... ;D ;D ;D , thx pak kapten....

Kalau ter-cache larinya masa cuma 3 MB…bohong banget bro..................
Buka POKER aja lari maksimalnya 10 MB..
cache dari VEVO itu minimal larinya 10 MB....

;) ;)

Maap sebelumnya, kemaren permasalahan yang dibahas adalah cara mengatasi error dan galat di youtube, untuk skr udah fix saya rasa, dan untuk masalah larinya trafick lan di 3mb, itu bukannya tergantung dari seting trafick shaper qinternet dari masing masing server dan saya rasa tiap server berbeda dalam menerapkan berapa besaran qinternetnya, mungkin di @detraxmx qinternetnya 12mb atau bahkan lebih sedangkan @meunara.net besaran qinternetnya hanya 4-6 mb.

Angka 3Mbps itu sebenarnya batas kecepatan per-Kbps, yang didapat client. (Namun demikian setiap orang memiliki persepsi sendiri2, dan hal itu wajar2 saja.).
Dengan angka 3Mb tersebut sangat wajar kalo jalannya (warna putihnya di loading ) cache akan tersendat2 alisan setahap demi setahap. Dan itu Real (nyata) bukan bohong. karena sesuai dengan konfigurasinya @meunara.net. (jadi harap di maklumi :) ) Dan saya salut terhadap hasil @meunara.net tersebut meskipun ada kekurangannya.

Terkadang banyak yang mengalami kenyataan seperti @meunara.net tersebut. akan tetapi karena sesuatu hal mereka tidak bersedia menshare di forum ini. (seperti jalannya cache step by step, eror acurations dan sebagainya.)

Saya Menggunakan DEFAULT LUSCA CACHE CUDY (tanpa edit .INC atau .Conf atau storeurl.pl) murni default. Sejauh ini tidak pernah mengalami kendala apapun. (jalannya loading warna putih wus sekejab ke ujung bar video yutube sedang warna merah merjalan normal.). http://www.youtube.com/watch?v=ifNIHlGKdb0&feature=youtu.be karena cepat loading putihnya nyaris tidak keliatan direkam hp. (harap maklum)

Sedangkan dibawah ini ada gambar yang ketika saya membuka file youtube. http://www.youtube.com/watch?v=n4RjJKxsamQ&ob=av2n terlihat jelas di traffic graph nya.

dan gambar traffic ke-2 merupakan traffic setelah cache selesai didapat oleh client. sementera user lain sedang menggunakan browsing dan aktifitas lainnya.

NB:
Saya tidak bermaksud apa-apa, hanya saja sedikit memberi semangat rekan2 yg masih mengalami kendala di cache youtube dengan membuka LOGIKA yang ada. Sehingga ada KEBERANIAN untuk MENERAPKAN TRIAL end ERROR menjadi SUCCESS.

![traffic cache scorpion.JPG](/public/imported_attachments/1/traffic cache scorpion.JPG)
![traffic cache scorpion.JPG_thumb](/public/imported_attachments/1/traffic cache scorpion.JPG_thumb)
![traffic setelah cache selesai dan user lain browsing.JPG](/public/imported_attachments/1/traffic setelah cache selesai dan user lain browsing.JPG)
![traffic setelah cache selesai dan user lain browsing.JPG_thumb](/public/imported_attachments/1/traffic setelah cache selesai dan user lain browsing.JPG_thumb)

pfsense_aja

@PakDe:

@kaptenhook:

@detrackmx:

@meunara.net:

lapor pak kapten….. youtube vevo terhit dengan baik..., WAN disuruh diam, kata LAN kepada WAN biarkan anak buah yang bermain... ;D ;D ;D , thx pak kapten....

Kalau ter-cache larinya masa cuma 3 MB…bohong banget bro..................
Buka POKER aja lari maksimalnya 10 MB..
cache dari VEVO itu minimal larinya 10 MB....

;) ;)

Maap sebelumnya, kemaren permasalahan yang dibahas adalah cara mengatasi error dan galat di youtube, untuk skr udah fix saya rasa, dan untuk masalah larinya trafick lan di 3mb, itu bukannya tergantung dari seting trafick shaper qinternet dari masing masing server dan saya rasa tiap server berbeda dalam menerapkan berapa besaran qinternetnya, mungkin di @detraxmx qinternetnya 12mb atau bahkan lebih sedangkan @meunara.net besaran qinternetnya hanya 4-6 mb.

Angka 3Mbps itu sebenarnya batas kecepatan per-Kbps, yang didapat client. (Namun demikian setiap orang memiliki persepsi sendiri2, dan hal itu wajar2 saja.).
Dengan angka 3Mb tersebut sangat wajar kalo jalannya (warna putihnya di loading ) cache akan tersendat2 alisan setahap demi setahap. Dan itu Real (nyata) bukan bohong. karena sesuai dengan konfigurasinya @meunara.net. (jadi harap di maklumi :) ) Dan saya salut terhadap hasil @meunara.net tersebut meskipun ada kekurangannya.

Terkadang banyak yang mengalami kenyataan seperti @meunara.net tersebut. akan tetapi karena sesuatu hal mereka tidak bersedia menshare di forum ini. (seperti jalannya cache step by step, eror acurations dan sebagainya.)

Saya Menggunakan DEFAULT LUSCA CACHE CUDY (tanpa edit .INC atau .Conf atau storeurl.pl) murni default. Sejauh ini tidak pernah mengalami kendala apapun. (jalannya loading warna putih wus sekejab ke ujung bar video yutube sedang warna merah merjalan normal.). http://www.youtube.com/watch?v=ifNIHlGKdb0&feature=youtu.be karena cepat loading putihnya nyaris tidak keliatan direkam hp. (harap maklum)

Sedangkan dibawah ini ada gambar yang ketika saya membuka file youtube. http://www.youtube.com/watch?v=n4RjJKxsamQ&ob=av2n terlihat jelas di traffic graph nya.

dan gambar traffic ke-2 merupakan traffic setelah cache selesai didapat oleh client. sementera user lain sedang menggunakan browsing dan aktifitas lainnya.

NB:
Saya tidak bermaksud apa-apa, hanya saja sedikit memberi semangat rekan2 yg masih mengalami kendala di cache youtube dengan membuka LOGIKA yang ada. Sehingga ada KEBERANIAN untuk MENERAPKAN TRIAL end ERROR menjadi SUCCESS.

wah sama dong dengan saya pakde…

masih menggunakan default dari lusca itu sendiri...

hanya saja saya mengalami kendala.. squidnya terlimit oleh CP. tapi ketika di nonaktifkan.. user sedot habis benwit. kira2 ada ga pencerahan buat saya ?? saya menggunakan PF 2.0.1

abnisrea

Coba dengan storeurl.pl dibawah ini aku dah coba bisa membantu.. aku dapatkan dari th30nly @comstuff.net

di COPAS aja..

#!/usr/bin/perl

store rewrite originally writen by chudy_fernandez@yahoo.com

modified by member of comstuff.net to satisfy common and dynamic content.

$|=1;
while (<>) {
@X = split;
# $X[1] =~ s/&sig=.*//;
$x = $X[0] . " ";
$_ = $X[1];
$u = $X[1];

#speedtest
if (m/^http://(.)/speedtest/(..(jpg|txt))?(.*)/) {
print $x . "http://www.speedtest.net.SQUIDINTERNAL/speedtest/" . $2 . "\n";

#mediafire
}elsif (m/^http://199.91.15\d.\d*/\w{12}/(\w*)/(.*)/) {
print $x . "http://www.mediafire.com.SQUIDINTERNAL/" . $1 ."/" . $2 . "\n";

#fileserve
}elsif (m/^http://fs\w*.fileserve.com/file/(\w*)/[\w-]./(.)/) {
print $x . "http://www.fileserve.com.SQUIDINTERNAL/" . $1 . "./" . $2 . "\n";

#filesonic
}elsif (m/^http://s[0-9].filesonic.com/download/([0-9])/(.*)/) {
print $x . "http://www.filesonic.com.SQUIDINTERNAL/" . $1 . "\n";

#4shared
}elsif (m/^http://[a-zA-Z]{2}\d*.4shared.com(:8080|)/download/(.)/(...)?./) {
print $x . "http://www.4shared.com.SQUIDINTERNAL/download/$2/$3\n";

#4shared preview
}elsif (m/^http://[a-zA-Z]{2}\d*.4shared.com(:8080|)/img/(\d*)/\w*/dlink__2Fdownload_2F(\w*)_3Ftsid_3D[\w-]/preview.mp3?sId=\w/) {
print $x . "http://www.4shared.com.SQUIDINTERNAL/$2\n";

#photos-X.ak.fbcdn.net where X a-z
}elsif (m/^http://photos-a-z(/./)(..jpg)/) {
print $x . "http://photos" . $1 . "/" . $2 . $3 . "\n";

#YX.sphotos.ak.fbcdn.net where X 1-9, Y a-z
} elsif (m/^http://[a-z][0-9].sphotos.ak.fbcdn.net/(.)/(.)/) {
print $x . "http://photos.ak.fbcdn.net/" . $1 ."/". $2 . "\n";

#maps.google.com
} elsif (m/^http://(cbk|mt|khm|mlt|tbn)[0-9]?(.google.co(m|.uk|.id).*)/) {
print $x . "http://" . $1 . $2 . "\n";

# compatibility for old cached get_video?video_id
} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com).?(videoplayback?id=.?|video_id=.?)&(.*?)/) {
$z = $2; $z =~ s/video_id=/get_video?video_id=/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $z . "\n";

# youtube fix by th30nly @comstuff.net
} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com)/videoplayback?(.)/) {
$p_str = $2;
$tag = "";
$alg = "";
$id = "";
$range = "";
if ($p_str =~ m/(itag=[0-9])/){$tag = "&".$1}
if ($p_str =~ m/(algorithm=[a-z]-[a-z])/){$alg = "&".$1}
if ($p_str =~ m/(id=[a-zA-Z0-9])/){$id = "&".$1}
if ($p_str =~ m/(range=[0-9-]*)/){$range = "&".$1; $range =~ s/-//; $range =~ s/range=//; }
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $tag . "&" . $alg . "&" . $id . "&" . $range . "\n";

} elsif (m/^http://www.google-analytics.com/__utm.gif?.*/) {
print $x . "http://www.google-analytics.com/__utm.gif\n";

#Cache High Latency Ads
} elsif (m/^http://([a-z0-9.])(.doubleclick.net|.quantserve.com|.googlesyndication.com|yieldmanager|cpxinteractive)(.)/) {
$y = $3;$z = $2;
for ($y) {
s/pixel;./pixel/;
s/activity;./activity/;
s/(imgad[^&])./\1/;
s/;ord=[?0-9]//;
s/;×tamp=[0-9]//;
s/[&?]correlator=[0-9]//;
s/&cookie=[^&]//;
s/&ga_hid=[^&]//;
s/&ga_vid=[^&]//;
s/&ga_sid=[^&]//;
# s/&prev_slotnames=[^&]//
# s/&u_his=[^&]//;
s/&dt=[^&]//;
s/&dtd=[^&]//;
s/&lmt=[^&]//;
s/(&alternate_ad_url=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/(&url=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/(&ref=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/(&cookie=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/[;&?]ord=[?0-9]//;
s/[;&]mpvid=[^&;]//;
s/&xpc=[^&]//;
# yieldmanager
s/?clickTag=[^&]//;
s/&u=[^&]//;
s/&slotname=[^&]//;
s/&page_slots=[^&]*//;
}
print $x . "http://" . $1 . $2 . $y . "\n";

#cache high latency ads
} elsif (m/^http://(.?)/(ads)?(.?)/) {
print $x . "http://" . $1 . "/" . $2 . "\n";

# spicific servers starts here….
} elsif (m/^http://(www.ziddu.com..[^/]{3,4})/(.?)/) {
print $x . "http://" . $1 . "\n";

#cdn, varialble 1st path
} elsif (($u =~ /filehippo/) && (m/^http://(.?).(.?)/(.?)/(.).([a-z0-9]{3,4})(?.*)?/)) {
@y = ($1,$2,$4,$5);
$y[0] =~ s/[a-z0-9]{2,5}/cdn./;
print $x . "http://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "\n";

#rapidshare
} elsif (($u =~ /rapidshare/) && (m/^http://(([A-Za-z]+[0-9-.]+)?)([a-z].[^/]{3}/[a-z]/[0-9])/(.*?)/([^/?&]{4,})$/)) {
print $x . "http://cdn." . $3 . "/SQUIDINTERNAL/" . $5 . "\n";

} elsif (($u =~ /maxporn/) && (m/^http://([^/]?)/(.?)/([^/]?)(?.)?$/)) {
print $x . "http://" . $1 . "/SQUIDINTERNAL/" . $3 . "\n";

#like porn hub variables url and center part of the path, filename etention 3 or 4 with or without ? at the end
} elsif (($u =~ /tube8|pornhub|xvideos/) && (m/^http://(([A-Za-z]+[0-9-.]+)?(.[a-z])?).([a-z][0-9]?.[^/]{3}/[a-z])(.?)((/[a-z])?(/[^/]){4}.[^/?]{3,4})(?.)?$/)) {
print $x . "http://cdn." . $4 . $6 . "\n";
#…spicific servers end here.

#photos-X.ak.fbcdn.net where X a-z
} elsif (m/^http://photos-[a-z].ak.fbcdn.net/(.*)/) {
print $x . "http://photos.ak.fbcdn.net/" . $1 . "\n";

#for yimg.com video
} elsif (m/^http://(.yimg.com)//(.)/([^/?&]/[^/?&].[^/?&]{3,4})(?.*)?$/) {
print $x . "http://cdn.yimg.com//" . $3 . "\n";

#for yimg.com doubled
} elsif (m/^http://(.?).yimg.com/(.?).yimg.com/(.?)?(.)/) {
print $x . "http://cdn.yimg.com/" . $3 . "\n";

#for yimg.com with &sig=
} elsif (m/^http://(.?).yimg.com/(.)/) {
@y = ($1,$2);
$y[0] =~ s/[a-z]+[0-9]+/cdn/;
$y[1] =~ s/&sig=.*//;
print $x . "http://" . $y[0] . ".yimg.com/" . $y[1] . "\n";

#youjizz. We use only domain and filename
} elsif (($u =~ /media[0-9]{2,5}.youjizz/) && (m/^http://(.)(.[^.-]?..?)/(.)/([^/?&]).([^/?&]{3,4})((?|%).)?$/)) {
@y = ($1,$2,$4,$5);
$y[0] =~ s/(([a-zA-A]+[0-9]+(-[a-zA-Z])?$)|(.cdn.)|(.cache.))/cdn/;
print $x . "http://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "\n";

#general purpose for cdn servers. add above your specific servers.
} elsif (m/^http://([0-9.]?)//(.?).(.)?(.?)/) {
print $x . "http://squid-cdn-url//" . $2 . "." . $3 . "\n";

#generic http://variable.domain.com/path/filename."ex" "ext" or "exte" with or withour "? or %"
} elsif (m/^http://(.)(.[^.-]?..?)/(.).([^/?&]{2,4})((?|%).*)?$/) {
@y = ($1,$2,$3,$4);
$y[0] =~ s/(([a-zA-A]+[0-9]+(-[a-zA-Z])?$)|(.cdn.)|(.cache.))/cdn/;
print $x . "http://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "\n";

# generic http://variable.domain.com/…
} elsif (m/^http://(([A-Za-z]+[0-9-]+)?|.cdn.|.cache.).(.?).(.?)/(.)$/) {
print $x . "http://cdn." . $3 . "." . $4 . "/" . $5 . "\n";

# spicific extention that ends with ?
} elsif (m/^http://(.?)/(.?).(jp(e?g|e|2)|gif|png|tiff?|bmp|ico|flv|on2)(.*)/) {
print $x . "http://" . $1 . "/" . $2 . "." . $3 . "\n";

# all that ends with ;
} elsif (m/^http://(.?)/(.?);(.*)/) {
print $x . "http://" . $1 . "/" . $2 . "\n";

} else {
print $x . $_ . "sucks\n";
}
}

meunara.net

Coba dengan storeurl.pl dibawah ini aku dah coba bisa membantu.. aku dapatkan dari th30nly @comstuff.net

di COPAS aja..

benar kata pepatah Lain Lubuk Lain Ikannya dan Lain Mesin Lain Pula Settingannya

coba pakai storeurl.pl @abnisrea ternyata di mesin saya malah wan sangat lamban untuk membuffer video, smentara dari sisi traffik Wan bandwidth yang di pakai terlalu sedikit, jika jalan Playing (yang merah) mampu mendahului jalan nya buffer (yang putih) memang tidak terjadi error, akan tetapi video di putar ulang dari awal dengan jalan buffer lebih cepat ke durasi sebelum pengulangan terjadi.

saya hanya pingin coba, bkan berarti belum puas dengan hasil yang sudah ada, (maklum tipe orang penasaran biasa kalo coba-coba) ;D , yang jelas tetap prefer ke yang tidak di temui masalah, walaupun tidak bekerja maksimal, ;)

abnisrea

coba edit /usr/local/etc/squid/tunning.conf
dan cari :

storeurl_rewrite_children 4 –-> diganti 2

n_aiops_threads 16 ----> diganti 24
load_check_stopen on <----------ditambah ini
load_check_stcreate on <--------ditambah ini

semoga ada perubahan lagi.. tolong direport..
salam PFI

meunara.net

@abnisrea:

coba edit /usr/local/etc/squid/tunning.conf
dan cari :

storeurl_rewrite_children 4 –-> diganti 2

n_aiops_threads 16 ----> diganti 24
load_check_stopen on <----------ditambah ini
load_check_stcreate on <--------ditambah ini

semoga ada perubahan lagi.. tolong direport..
salam PFI

di mesin saya kok ngak ada tunning.conf nya ya?? ??? ,
padahal waktu pertama instal ada tunning.conf nya…, lari kemana nih tunning.conf.....

detrackmx

dah lancar cache youtube…akhirnya beres juga.

Tapi lari maksimal untuk cache youtube baru 15 - 30 MB, blum rata-rata diatas 60 MB (mesin Virtualbox).
Kalau cuma buka video cache youtube ukuran 240, video durasi 8 menit sanggup dibuka hampir 1 detik selesai 100%.

ni capture swaktu membuka 5 cache youtube bersamaan...
-------------------------------------------------///
jangan berharap banyak kalau pakai ini:
------------------------------------------------\\

youtube All itag (semua resolusi)

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){
@itag = m/&?/;
@id = m/&?/;
@range = m/&?/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

ATAU ini:
–--

youtube fix

} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com)/videoplayback?(.)/) {
$p_str = $2;
$tag = "";
$alg = "";
$id = "";
$range = "";
if ($p_str =~ m/(itag=[0-9])/){$tag = "&".$1}
if ($p_str =~ m/(algorithm=[a-z]-[a-z])/){$alg = "&".$1}
if ($p_str =~ m/(id=[a-zA-Z0-9])/){$id = "&".$1}
if ($p_str =~ m/(range=[0-9-]*)/){$range = "&".$1; $range =~ s/-//; $range =~ s/range=//; }
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $tag . "&" . $alg . "&" . $id . "&" . $range . "\n";
–------------

dari ke 2 fix youtube diatas ane modif lagi algoritmanya..

![8 mei 2012.JPG_thumb](/public/imported_attachments/1/8 mei 2012.JPG_thumb)
![8 mei 2012.JPG](/public/imported_attachments/1/8 mei 2012.JPG)

abnisrea

Tolong dishare dong berguna buat rekan-rekan yg lain.. thx

kaptenhook

@detrackmx:

dah lancar cache youtube…akhirnya beres juga.

Tapi lari maksimal untuk cache youtube baru 15 - 30 MB, blum rata-rata diatas 60 MB (mesin Virtualbox).
Kalau cuma buka video cache youtube ukuran 240, video durasi 8 menit sanggup dibuka hampir 1 detik selesai 100%.

ni capture swaktu membuka 5 cache youtube bersamaan...
-------------------------------------------------///
jangan berharap banyak kalau pakai ini:
------------------------------------------------\\

youtube All itag (semua resolusi)

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){
@itag = m/&?/;
@id = m/&?/;
@range = m/&?/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

ATAU ini:
–--

youtube fix

} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com)/videoplayback?(.)/) {
$p_str = $2;
$tag = "";
$alg = "";
$id = "";
$range = "";
if ($p_str =~ m/(itag=[0-9])/){$tag = "&".$1}
if ($p_str =~ m/(algorithm=[a-z]-[a-z])/){$alg = "&".$1}
if ($p_str =~ m/(id=[a-zA-Z0-9])/){$id = "&".$1}
if ($p_str =~ m/(range=[0-9-]*)/){$range = "&".$1; $range =~ s/-//; $range =~ s/range=//; }
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $tag . "&" . $alg . "&" . $id . "&" . $range . "\n";
–------------

dari ke 2 fix youtube diatas ane modif lagi algoritmanya..

Kalo memang MERASA punya script alogaritma yang bagus jangan hanya di omongin doang dong, coba dishare dimari, nanti biar temen temen bisa coba pakai, disinikan ts nya cara mengatasi error youtube, jadi yang dibutuhkan adalah SOLUSI, kalo hanya bisa menjudge dan mencela tanpa mau berbagi, udah banyak saya rasa di beberapa forum-forum sebelah.

abnisrea

Setuju baget Kapten.. Kalo perlu kapten turun tangan sebelum jendral besar turun.. ;D ;D ;D ;D

pfz

@detrackmx:

dah lancar cache youtube…akhirnya beres juga.

Tapi lari maksimal untuk cache youtube baru 15 - 30 MB, blum rata-rata diatas 60 MB (mesin Virtualbox).
Kalau cuma buka video cache youtube ukuran 240, video durasi 8 menit sanggup dibuka hampir 1 detik selesai 100%.

ni capture swaktu membuka 5 cache youtube bersamaan...
-------------------------------------------------///
jangan berharap banyak kalau pakai ini:
------------------------------------------------\\

youtube All itag (semua resolusi)

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){
@itag = m/&?/;
@id = m/&?/;
@range = m/&?/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

ATAU ini:
–--

youtube fix

} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com)/videoplayback?(.)/) {
$p_str = $2;
$tag = "";
$alg = "";
$id = "";
$range = "";
if ($p_str =~ m/(itag=[0-9])/){$tag = "&".$1}
if ($p_str =~ m/(algorithm=[a-z]-[a-z])/){$alg = "&".$1}
if ($p_str =~ m/(id=[a-zA-Z0-9])/){$id = "&".$1}
if ($p_str =~ m/(range=[0-9-]*)/){$range = "&".$1; $range =~ s/-//; $range =~ s/range=//; }
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $tag . "&" . $alg . "&" . $id . "&" . $range . "\n";
–------------

dari ke 2 fix youtube diatas ane modif lagi algoritmanya..

waduh…. kayaknya mengarah ke gak sehat nih...

Yang dibicarakan diatas itu mengenai error buka yutube atau cache yutube yang ke-limit?

script perl yg dianggap tidak bisa diandalkan itu sepertinya tidak ada masalah, karena si pembuatnya menandai berdasarkan tag2 tertentu. tentu saja kalao tag-nya dianggap gak sinkron kemungkinan jg gak bisa di cache ( perintah print gak berjalan) . (nah kondisi ini mungkin bagi beberapa orang dianggap tidak pass.)

Sepertinya storeurl om cuddy masih bisa diandalkan buat saya.

poscom

abnisrea

monggo dicoba storeurl om cuddy :

#!/usr/bin/perl

$Rev$

by chudy_fernandez@yahoo.com

Youtube updates at http://wiki.squid-cache.org/ConfigExamples/DynamicContent/YouTube/Discussion

$|=1;
while (<>) {
@X = split;

$X[1] =~ s/&sig=.*//;

$x = $X[0] . " ";
$_ = $X[1];
$u = $X[1];

#photos-X.ak.fbcdn.net where X a-z
if (m/^http://photos-[a-z]?(.ak.fbcdn.net.*)/) {
print $x . "http://photos" . $1 . "\n";

#maps.google.com
} elsif (m/^http://(khm|mt)[0-9]?(.google.com.*)/) {
print $x . "http://" . $1 . $2 . "\n";

compatibility for old cached get_video?video_id

} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com).?(videoplayback?id=.?|video_id=.?)&(.*?)/) {
$z = $2; $z =~ s/video_id=/get_video?video_id=/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $z . "\n";

youtube 1024p HD itag=37, 720p HD itag=22

} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com).?&(itag=37|itag=22).?&(id=[a-zA-Z0-9])/) {
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $2 . "&" . $3 . "\n";

youtube 360p itag=34 ,480p itag=35 and others

} elsif (m/^http://([0-9.]{4}|..youtube.com|..googlevideo.com|..video.google.com).?&(itag=[0-9]).?&(id=[a-zA-Z0-9]*)/) {
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/" . $3 . "\n";

} elsif (m/^http://www.google-analytics.com/__utm.gif?.*/) {
print $x . "http://www.google-analytics.com/__utm.gif\n";

#Cache High Latency Ads
} elsif (m/^http://([a-z0-9.])(.doubleclick.net|.quantserve.com|.googlesyndication.com|yieldmanager|cpxinteractive)(.)/) {
$y = $3;$z = $2;
for ($y) {
s/pixel;./pixel/;
s/activity;./activity/;
s/(imgad[^&])./\1/;
s/;ord=[?0-9]//;
s/;×tamp=[0-9]//;
s/[&?]correlator=[0-9]//;
s/&cookie=[^&]//;
s/&ga_hid=[^&]//;
s/&ga_vid=[^&]//;
s/&ga_sid=[^&]*//;

s/&prev_slotnames=[^&]*//

s/&u_his=[^&]*//;

s/&dt=[^&]//;
s/&dtd=[^&]//;
s/&lmt=[^&]//;
s/(&alternate_ad_url=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/(&url=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/(&ref=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/(&cookie=http%3A%2F%2F[^(%2F)])[^&]/\1/;
s/[;&?]ord=[?0-9]//;
s/[;&]mpvid=[^&;]//;
s/&xpc=[^&]//;

yieldmanager

s/?clickTag=[^&]//;
s/&u=[^&]//;
s/&slotname=[^&]//;
s/&page_slots=[^&]//;
}
print $x . "http://" . $1 . $2 . $y . "\n";

#cache high latency ads
} elsif (m/^http://(.?)/(ads)?(.?)/) {
print $x . "http://" . $1 . "/" . $2 . "\n";

} elsif (m/^http://(www.ziddu.com..[^/]{3,4})/(.?)/) {
print $x . "http://" . $1 . "\n";

#cdn, varialble 1st path
} elsif (($u =~ /filehippo/) && (m/^http://(.?).(.?)/(.?)/(.).([a-z0-9]{3,4})(?.*)?/)) {
@y = ($1,$2,$4,$5);
$y[0] =~ s/[a-z0-9]{2,5}/cdn./;
print $x . "http://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "\n";

#rapidshare
} elsif (($u =~ /rapidshare/) && (m/^http://(([A-Za-z]+[0-9-.]+)?)([a-z].[^/]{3}/[a-z]/[0-9])/(.*?)/([^/?&]{4,})$/)) {
print $x . "http://cdn." . $3 . "/SQUIDINTERNAL/" . $5 . "\n";

} elsif (($u =~ /maxporn/) && (m/^http://([^/]?)/(.?)/([^/]?)(?.)?$/)) {
print $x . "http://" . $1 . "/SQUIDINTERNAL/" . $3 . "\n";

#domain/path/./path/filename
} elsif (($u =~ /fucktube/) && (m/^http://(.?)(.[^.-]?[^/]/[^/])/(.)/([^/])/([^/?&]).([^/?&]{3,4})(?.*?)$/)) {
@y = ($1,$2,$4,$5,$6);
$y[0] =~ s/(([a-zA-A]+[0-9]+(-[a-zA-Z])?$)|([^.]cdn[^.])|([^.]cache[^.]))/cdn/;
print $x . "http://" . $y[0] . $y[1] . "/" . $y[2] . "/" . $y[3] . "." . $y[4] . "\n";

#like porn hub variables url and center part of the path, filename etention 3 or 4 with or without ? at the end
} elsif (($u =~ /tube8|pornhub|xvideos/) && (m/^http://(([A-Za-z]+[0-9-.]+)?(.[a-z])?).([a-z][0-9]?.[^/]{3}/[a-z])(.?)((/[a-z])?(/[^/]){4}.[^/?]{3,4})(?.)?$/)) {
print $x . "http://cdn." . $4 . $6 . "\n";

#for yimg.com video
} elsif (m/^http://(.yimg.com)//(.)/([^/?&]/[^/?&].[^/?&]{3,4})(?.*)?$/) {
print $x . "http://cdn.yimg.com//" . $3 . "\n";

#for yimg.com doubled
} elsif (m/^http://(.?).yimg.com/(.?).yimg.com/(.?)?(.)/) {
print $x . "http://cdn.yimg.com/" . $3 . "\n";

#for yimg.com with &sig=
} elsif (m/^http://([^.]).yimg.com/(.)/) {
@y = ($1,$2);
$y[0] =~ s/[a-z]+([0-9]+)?/cdn/;
$y[1] =~ s/&sig=.*//;
print $x . "http://" . $y[0] . ".yimg.com/" . $y[1] . "\n";

#youjizz. We use only domain and filename
} elsif (($u =~ /media[0-9]{1,5}.youjizz/) && (m/^http://(.?)(.[^.-]?.[^/])/(.)/([^/?&]).([^/?&]{3,4})(?.?)$/)) {
@y = ($1,$2,$4,$5);
$y[0] =~ s/(([a-zA-A]+[0-9]+(-[a-zA-Z])?$)|([^.]cdn[^.])|([^.]cache[^.]))/cdn/;
print $x . "http://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "\n";

#general purpose for cdn servers. add above your specific servers.
} elsif (m/^http://([0-9.]?)//(.?).(.)?(.?)/) {
print $x . "http://squid-cdn-url//" . $2 . "." . $3 . "\n";

spicific extention

} elsif (m/^http://(.?).(jp(e?g|e|2)|gif|png|tiff?|bmp|ico|flv|wmv|3gp|mp(4|3)|exe|msi|zip|on2|mar|swf).?/) {

@y = ($1,$2);

$y[0] =~ s/((cache|cdn)[-\d])|([a-zA-A]+-?[0-9]+(-[a-zA-Z])?)/cdn/;

print $x . "http://" . $y[0] . "." . $y[1] . "\n";

#generic http://variable.domain.com/path/filename."ex", "ext" or "exte"
#http://cdn1-28.projectplaylist.com
#http://s1sdlod041.bcst.cdn.s1s.yimg.com
} elsif (m/^http://(.?)(.[^.-]?..?)/([^?&=]).([\w\d]{2,4})??.$/) {
@y = ($1,$2,$3,$4);
$y[0] =~ s/([a-z][0-9][a-z]dlod[\d]{3})|((cache|cdn)[-\d])|([a-zA-A]+-?[0-9]+(-[a-zA-Z]*)?)/cdn/;
print $x . "storeurl://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "\n";

all that ends with ;

} elsif (m/^http://(.?)/(.?);(.*)/) {
print $x . "http://" . $1 . "/" . $2 . "\n";

} else {
print $x . $_ . "\n";
}
}

pfz

storeurl.pl asli om cuddy diatas, yang di babar oleh om @abnisrea itu kalo untuk yutube2 yg banyak isinya daun2 muda sangat tepat. alias, muantap..
salah satunya ini yang om suka : http://www.youtube.com/watch?v=MZuL4w9Tcd0 soalnya daun muda semua.. ;D ;D

zass

"BAD NEWS:
Some research update (Someone please confirm and post your comments)
YOUTUBE has split its videos into segments of 1.5 Mb each which is the approximation of the 51 seconds. I am sure YOUTUBE have taken this step to prevent people from caching entire videos. If you have a video which is 100 Mb large, it will be split into about 55-60 segments.
As of right now, storeurl.pl wont be able to cache it. Currently VIDEOCACHE plugin is doing full cache of youtube but at higher $$$ cost"

http://aacable.wordpress.com/2012/01/30/youtube-caching-problem-an-error-occured-please-try-again-later-solved/

(SHARE) MENGATASI ERROR BUKA YOUTUBE

youtube All itag (semua resolusi)

$Rev$

by chudy_fernandez@yahoo.com

Youtube updates at http://wiki.squid-cache.org/ConfigExamples/DynamicContent/YouTube/Discussion

$X[1] =~ s/&sig=.*//;

s/&prev_slotnames=[^&]*//

s/&u_his=[^&]*//;

yieldmanager

spicific extention

} elsif (m/^http://(.?).(jp(e?g|e|2)|gif|png|tiff?|bmp|ico|flv|wmv|3gp|mp(4|3)|exe|msi|zip|on2|mar|swf).?/) {

@y = ($1,$2);

$y[0] =~ s/((cache|cdn)[-\d])|([a-zA-A]+-?[0-9]+(-[a-zA-Z])?)/cdn/;

print $x . "http://" . $y[0] . "." . $y[1] . "\n";

all that ends with ;

store rewrite originally writen by chudy_fernandez@yahoo.com

modified by member of comstuff.net to satisfy common and dynamic content.

youtube All itag (semua resolusi)

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){ @itag = m/&?/; @id = m/&?/; @range = m/&?/; print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

youtube fix

youtube All itag (semua resolusi)

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){ @itag = m/&?/; @id = m/&?/; @range = m/&?/; print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

youtube fix

youtube All itag (semua resolusi)

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){ @itag = m/&?/; @id = m/&?/; @range = m/&?/; print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

youtube fix

$Rev$

by chudy_fernandez@yahoo.com

Youtube updates at http://wiki.squid-cache.org/ConfigExamples/DynamicContent/YouTube/Discussion

$X[1] =~ s/&sig=.*//;

compatibility for old cached get_video?video_id

youtube 1024p HD itag=37, 720p HD itag=22

youtube 360p itag=34 ,480p itag=35 and others

s/&prev_slotnames=[^&]*//

s/&u_his=[^&]*//;

yieldmanager

spicific extention

} elsif (m/^http://(.?).(jp(e?g|e|2)|gif|png|tiff?|bmp|ico|flv|wmv|3gp|mp(4|3)|exe|msi|zip|on2|mar|swf).?/) {

@y = ($1,$2);

$y[0] =~ s/((cache|cdn)[-\d])|([a-zA-A]+-?[0-9]+(-[a-zA-Z])?)/cdn/;

print $x . "http://" . $y[0] . "." . $y[1] . "\n";

all that ends with ;

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){
@itag = m/&?/;
@id = m/&?/;
@range = m/&?/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){
@itag = m/&?/;
@id = m/&?/;
@range = m/&?/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";

} elsif ($X[1] =~ /(youtube|google).*videoplayback?/){
@itag = m/&?/;
@id = m/&?/;
@range = m/&?/;
print $x . "http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range\n";