Select Code to Download

4363^7619082^309839685^309841122^14^18
4363^7619082^309839685^309841122^14^19
...
4363^7619082^309839685^309841122^14^52
4363^7619082^309839685^309841122^14^51
4363^7619082^309839685^309841122^23^21

 perl -ne '@ar = split /\^/; $key="$ar[0],$ar[1],$ar[2],$ar[3]\n"; pri
+nt $key if ( ! $seen{$key} ++ );' datafile

perl -naF^ -e '$key="$F[0],$F[1],$F[2],$F[3]\n"; print $key if ( ! $se
+en{$key} ++ );' datafile

...
-F/\^/
-F"^"
-F'^'