Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Netscape Bookmarks to Hash

by deprecated (Priest)
on May 04, 2001 at 03:38 UTC ( [id://77837]=CUFP: print w/replies, xml ) Need Help??

This converts Netscape (4.7) bookmarks.html to a hash. Sort of. It prints out what a hash would look like so you can just concatenate it to a script youre working on. The heart of this is a regular expression, some credit for which is due to japhy. I used this to create a cgi for my bookmarks from several different machines (work, home, laptop, etcetera) that I had been running linux on.

I have only tested this on linux boxes.

#!/usr/bin/perl -w use strict; my $bms; { local $/; my $file = shift; open BMS, $file; $bms = <BMS> } my @html = split /<DT>/, $bms; foreach my $link (@html) { my ($dest, $name) = $link =~ m#<A HREF="([^"]+)"[^>]*>([^<]+)</A>#; print <<"EOF"; { '$name' => '$dest' }, EOF }

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (3)
As of 2024-03-29 14:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found