You can use the flip-flop operator ".." for that. Read perlop to find out how it works. Note that .. isn't a list constructing operator in scalar context.

while (<DATA>){
    next if 1 .. /^Buffers/;
    print;
}

# I copied the line with the numbers several times,
# to convince myself that the script wouldn't stop
# after printing just the first.

__DATA__
DDR -- Running --
# Event  Snoopy   Snoopy   Replay   Replay   Current  Current
Buffers   ID      Position  ID      Position   ID     Position
1024     1667721  2975e7c  1667717  6d44e10  1667721  2982000
1024     1667721  2975e7c  1667717  6d44e10  1667721  2982000
1024     1667721  2975e7c  1667717  6d44e10  1667721  2982000
[download]

2;0 juerd@ouranos:~$ perl -e'undef christmas'
Segmentation fault
2;139 juerd@ouranos:~$
[download]