Buscando por la WEB como redireccionar una URL para otra encontre este script y lo adapte a mis necesidades, necesito que cuando algun usuario pida www.facebook.com lo diriga a m.facebook.com pero no me funciona ya di permisos a mi ejecutable y la regla la puse por encima de todos los permisos del squid para que sea la primera en verificar. Alguna idea que puede estar pasando o si alguien sabe como lograr esto porfa me urge...
Saludos
Código
#!/usr/bin/perl $mirror = "m.facebook.com"; $| = 1; while (<>) { $_ = $line[0]; if (m/^http:\/\/((?:[a-z0-9]+\.)?\.facebook\.com )\/(.*)/ && $1 ne $mirror) { } else { } }