Se o Perl estiver instalado (como será em uma máquina RHEL):
perl -MIO::Socket::INET -ne 'BEGIN{$l=IO::Socket::INET->new(
LocalPort=>1234,Proto=>"tcp",Listen=>5,ReuseAddr=>1);
$l=$l->accept}print $l $_' < ~/.bashrc
funcionaria, a menos que um firewall local não permita conexões de entrada para 1234.
Se o socat estiver instalado:
socat -u - tcp-listen:1234,reuseaddr < ~/.bashrc
Se o zsh estiver instalado:
zmodload zsh/net/tcp
ztcp -ld3 1234 && # start listening socket on fd 3
ztcp -ad4 3 && # accept connection on fd 4
ztcp -c 3 && # close the listening socket that is no longer needed
cat < ~/.bashrc >&4 && # send the data
ztcp -c 4 # close the communication socket to tell the other end we're finished