my $filename = <aa>
subroutine($filename);