Deleting all lines not perpendicular to another line layer using QGIS?

I am using the latest QGIS 3.4.4

I have a layer 1 which has a bunch of lines in all directions. I have another layer 2 intersecting those lines.

I want to delete all the lines in layer 1 that do not cross perpendicularly to layer 2.

Data: You can download the two line layers here

This seems simple but I cant seem to get it right.