If you are working interactively then you don't need a script:
If this is part of a larger script then you can use the intuitively named functions. Take a look at the scripting index for more info on each:
names default to here(1); dt = Open( "$Sample_data/Big class.jmp" ); dt << Select Duplicate Rows( match(:age)); dt << Delete Rows;