open ( SMI, "schema_migration.csv") or die "$!"; # buffering the newschema { @schema_migration = ; map { $_ =~ s/\n//g } @schema_migration; } print "\n"; print "\nout :$schema_migration[3]:\n"; exit;