$fname = $ARGV[0];

@paragraphs = AnalyzeText (ReadFile ($fname));