using perl to override output redirection

[prajil]

Hi,

Could anyone point how can i override output redirection using perl.
i.e.
command > file 2>&1 will redirect both output and error of command to file
I need to print a message to tty even if there is redirection.

[numberwhun]

Hi,

Could anyone point how can i override output redirection using perl.
i.e.
command > file 2>&1 will redirect both output and error of command to file
I need to print a message to tty even if there is redirection.

Well, one way is to use the open() function and open the file / connection. Then, use a print statement to print to the filehandle from the open function.

ie:

open(TTY, "|<tty connection>");
 
print TTY ("Your info here!\n");
 

Hope that helped.

Regards,

Jeff

[prajil]

Well, one way is to use the open() function and open the file / connection. Then, use a print statement to print to the filehandle from the open function.

ie:

open(TTY, "|<tty connection>");
 
print TTY ("Your info here!\n");
 

Hope that helped.

Regards,

Jeff

Hi Jeff,

Thanks for your reply. But still it is redirecting to the output file.
------------
>./eg.pl
not a tty
>
-----------
>./eg.pl >& file
>
-------------