use warnings;
use strict;

use Getfile;

print qq{printing from file }, Getfile->FILENAME, qq{\n};

print Getfile->content;  # in list context

Getfile->reset;  # start again
print scalar Getfile->content;
print scalar Getfile->content;