Select Code to Download

#!/usr/bin/perl -w
use strict;
...
s!/!.!g; # Generate suitable filename
open FH, ">/home/mis/tstanley/Migrate/$_" or die $!;
print FH $output;