Help for this page

Select Code to Download

Select or download this

use Term::Clui;
my $filename = ask("Please enter a filename:","C:\test.txt");