$/ = "\n//\n";   # Or whatever is appropriate.

while (<>) {
    chomp;              # Removes the field separator.
    next if /^\s*$/;    # Skip "space-only" records.
    # Do stuff here.
}