redirecting squid

[frevol nicolas <nfrevol@xxxxxxxx>]

hi,

i am trying to use use squid with an external program.
So i did:
"redirect_program /home/mysession/rep/executable"

In my Perl executable, i take the argv[0] value.

But what kind ok value do i have to print out ?
for example my perl script is :
-------------------------
#!/usr/bin/perl -w
use strict;

$|=1;
while (<>) {
   my @X = split;
   my $url = $X[0];
   my $test = 0;   #just a test value for later
      if ($url =~ /^http:\/\/internal\.foo\.com/) {
	 $url =~ s/^http/https/;
	 $url =~ s/internal/secure/;
	 if($test==0){
		print "302:$url\n";
	 }else{
		print  "file:///home/template.html";
	 }
      }else{
	 if($test==0){
		print "http://fr.yahoo.com\n";;
	 }else {
		print  "file:///template.html";
	 }
      }
}
------------------------- 
the result is that i have the yahoo site on my screen
without pictures.

and if i replace 
print "http://fr.yahoo.com\n";; 
by
print "file:///template.html";

it doesn't works


any ideas?

 


	

	
		
___________________________________________________________________________ 
Faites de Yahoo! votre page d'accueil sur le web pour retrouver directement vos services préférés : vérifiez vos nouveaux mails, lancez vos recherches et suivez l'actualité en temps réel. 
Rendez-vous sur http://fr.yahoo.com/set