# match 1 (Klammern) in $1 usw.
if (m/^(\d+)\s+~?(\d+)\s+(\d+)\s+(\d+)/g){
    $var1 = $1
    $var2 = $2
    $var3 = $3
    $var4 = $4
)