Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

batch expand Windows compressed printer driver files

by grinder (Bishop)
on Nov 18, 2004 at 15:54 UTC ( [id://408792]=CUFP: print w/replies, xml ) Need Help??

I had a directory full of compressed printer driver files for Windows. The file abc.de_ is expanded into abc.def (and the fact that _ is replaced by f is governed by a file with an .INF exension). Normally this is all dealt with behind the scenes automatically, but I had to do it manually.

The following snippet will look for lines that contain the abc.de_/abc.def mapping and expands those files.

Additional error checking is left as an exercise to the reader :)

perl -nle "/^([^.]+\.[A-Z]{3}),([^.]+\.[A-Z]{2}_)$/ and system qq{expand $2 $1}" HPBF3510.inf

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: CUFP [id://408792]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others having a coffee break in the Monastery: (4)
As of 2024-04-24 04:28 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found