"Selection" is a property of the Application object, not the Sheet object. The application object is $xl in your code. You will probably want to have a look at the Object Model in the Excel help file.

Line 21 should look something like this:

$xl->Selection->Delete({ Shift => xlToLeft });

Also, note that the constant is xlToLeft, at least with Excel 97.