Blue Flower

So kann man z.B. STDOUT in Variable umlieten:

 #!/usr/bin/perl
use strict;
my ($user_name,$name,$home_dir,$bash,$Inhalt);
$user_name = "username";
$name = "Vor und Nachname";
$home_dir = "/home/username";
$bash = "/bin/bash";
open (FH, '>', \$Inhalt);
format FH_TOP =
User                   Name                       Home Dir               Shell
----------------------------------------------------------------------------------------------
.
format FH =
@<<<<<<<<<<<<<         @<<<<<<<<<<<<<<<<<<<<      @<<<<<<<<<<<<<<<<<<<   @<<<<<<<<<<<
$user_name, $name, $home_dir, $bash
.
write FH;
close FH;
print "Hier der Inhalt:\n$Inhalt";