#!/usr/bin/perl
open my $fh, ">/dev/tty" or die $!;
print $fh "Hallo, Welt!\n";