#!/usr/local/bin/perl

################################################

# FindAndReplace.pl
# Version 1

# Robert D. Cormia
# UCSC Programming for Bioinformatics II
# October 10, 2003

################################################

# Write a Perl program called 'FindAndReplace' that will accept two
# strings and one or more filenames as arguments. Replace all
# occurrences of the first string with the second string, in all
# the files mentioned.

# Pseudocode
#
# Need to create a way to read two strings
# First string is the string to be found
# Second string is what will replace first string
# Next need to read filenames into an array
# Each element of the array (filenames) will be opened
# And a line replacement algorithm with search and replace
# Until all the files have been opened and strings replaced
# Make sure to close each of the files when finished.

use strict;

# variables assigned

__END__