#!/usr/bin/perl

./a.out input.txt > output.txt   ###How should I do this?

$output_file="output.txt";
open(OP, $output_file) || die("Could not open file!");
@sequence=<OP>;     # tosses the contents of "output.txt" in an array "@sequence" to work on.