use strict;
use Foo;

Foo::set_file( $some_file );

for ( 0..10 ) {
    print Foo::get_line 
};