#!c:/perl/bin/perl -w
$|++;

use strict;
use IO::All;

my $x = 'localhost:12345';
my $y = 'c:/servdata';

io($x) > io($y);

__END__
Undefined behavior for overloaded IO::All operation: 'socket > file' at C:/Perl/site/lib/IO/All.pm line 840.