Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re: OT: Quark Xpress Which art is it using??

by earthboundmisfit (Chaplain)
on Oct 26, 2002 at 00:35 UTC ( #208181=note: print w/replies, xml ) Need Help??


in reply to OT: Quark Xpress Which art is it using??

I'm not aware of any module that would access these files directly and a quick Google search came up mostly with people whining about the inability to do so. <thunk>

Why not convert the Quark files to XML and use any of the fine XML modules to mine and keep track of the art being used? There are tons of Quark to XML converters out there.

  • Comment on Re: OT: Quark Xpress Which art is it using??

Replies are listed 'Best First'.
Re: Re: OT: Quark Xpress Which art is it using??
by HamNRye (Monk) on Oct 26, 2002 at 17:08 UTC

    Thanks for the reply ebm, but a bit of hacking about produced the following code. Looking at the file in a hex editor revealed that the paths are stored in plain text.

    One of the benefits of our ad prod system is that everything Art wise would be prefaced by "AdArt". I would assume that you could just as easily write the regex below to look for ".eps .tif" etc...

    Das Code:

    #! /bin/perl -w ########################################################## # Get linked Art # Finds out what art a QXD is using ########################################################## $filename = $ARGV[0]; @quark_data = `strings $filename`; @usage = parseUsage(@quark_data); @usage = trim_path(@usage); printArr(@usage); sub trim_path { my @trimmed; for (@_) { $_ =~ /AdArt\:.*\.low/; push @trimmed, $&; } return @trimmed; } sub printArr { my $n = 0; foreach (@_) {print $n++.": $_\n"}; } sub parseUsage { my @winners; for (@_) { /AdArt/ && do {push @winners, $_;}; } return @winners; }

    Das Output:

    usage.pl 1234342 0: AdArt:EHO LOGO-TIFF.low 1: AdArt:EHO LOGO-TIFF.low 2: AdArt:Header_FOR_FILLER.tif.low 3: AdArt:long_fosterlogo.tiff.low 4: AdArt:3853_dove_homes_logo.eps.low 5: AdArt:CENTEX_LOGO_THE_BEST.EPS.low 6: AdArt:long_fosterlogo.tiff.low 7: AdArt:long_fosterlogo.tiff.low 8: AdArt:CENTEX_LOGO_THE_BEST.EPS.low 9: AdArt:Century21_Logo.tif.low 10: AdArt:Century21_Logo.tif.low 11: AdArt:V3853_edgewaterlogo.tif.low 12: AdArt:forestlakelogo.eps.low 13: AdArt:long_fosterlogo.tiff.low 14: AdArt:Forest Lake.eps.low 15: AdArt:thehighlandslogo.tif.low

    I'm assuming that this would even work under windows provided you downloaded Gnu strings from the gnerds. Would probably make a nice module if I made it a bit less specific to my application.

    Thanks!
    Hammy

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (4)
As of 2022-08-14 08:38 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?