For a datafile like:
john doe|18|14|jeff|green
mjk@atlascgi.comCode:open(FILE,"/path/to/file"); while(<FILE>) { my($name, $age, $favoriteNumber, $thatJeffThing, $favoriteColor) = split(/\|/); print "all the stuff out however you want"; } close(FILE);




Bookmarks