in reply to reading var from the file
This gives :use strict; use warnings; local $/ = "/\n"; while (my $var_temp = <DATA>) { $var_temp =~ s/\n//g; # Strip out new-lines print "$var_temp\n"; } __DATA__ abds.wewe/fssaf:erferr@abc.co c.us:342/ abds.wewe/fssaf:erferr@abc.coc.us:342/
abds.wewe/fssaf:erferr@abc.coc.us:342/ abds.wewe/fssaf:erferr@abc.coc.us:342/
|
|---|