$ cat at_star.pl 
use strict;
use warnings;

use Data::Dumper;

push @*, 'Servus beianand!';

print "Perl $]:\n";   # version of Perl
print Dumper(\@*);

bernhard@bernhard-Aspire-A515-57:~/devel/Perl$ perl at_star.pl 
Perl 5.006001:
$VAR1 = [
          'Servus beianand!'
        ];