glob分からん困った

glob_test.pl

#!/usr/bin/env perl
#
use strict;
use warnings;
use utf8;

use Data::Dumper;

my $file = "hoge.txt";

for(0..5){
	print Dumper("hoge") if -e glob($file);
	print Dumper glob($file);
	print Dumper glob($file);
	print Dumper glob($file);
	print Dumper $file;
	print "================================", "\n";
}


__END__

perl hoge.pl
$VAR1 = 'hoge';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
================================
Use of uninitialized value in -e at hoge.pl line 12.
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
================================
$VAR1 = 'hoge';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
================================
Use of uninitialized value in -e at hoge.pl line 12.
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
================================
$VAR1 = 'hoge';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
================================
Use of uninitialized value in -e at hoge.pl line 12.
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
$VAR1 = 'hoge.txt';
================================