To delete part of variable (if you mean those %x) - use $deltok. To delete line from file use /write. To delet part of line use $read, modify data from $read and re-/write it to same line.

Dont give a fish - teach to fish!