{"id":17790893,"url":"https://github.com/davorg/dodgy-old-crap","last_synced_at":"2025-04-02T01:46:37.263Z","repository":{"id":66584764,"uuid":"55831869","full_name":"davorg/dodgy-old-crap","owner":"davorg","description":"Various pieces of code from the dawn of time (or, at least, the dawn of this millennium)","archived":false,"fork":false,"pushed_at":"2016-04-09T08:04:47.000Z","size":127,"stargazers_count":1,"open_issues_count":0,"forks_count":0,"subscribers_count":3,"default_branch":"master","last_synced_at":"2025-02-07T16:44:12.523Z","etag":null,"topics":["crap","embarrassing","old","perl"],"latest_commit_sha":null,"homepage":null,"language":"Perl","has_issues":true,"has_wiki":null,"has_pages":null,"mirror_url":null,"source_name":null,"license":null,"status":null,"scm":"git","pull_requests_enabled":true,"icon_url":"https://github.com/davorg.png","metadata":{"files":{"readme":"README.md","changelog":null,"contributing":null,"funding":null,"license":null,"code_of_conduct":null,"threat_model":null,"audit":null,"citation":null,"codeowners":null,"security":null,"support":null,"governance":null,"roadmap":null,"authors":null,"dei":null,"publiccode":null,"codemeta":null}},"created_at":"2016-04-09T07:38:04.000Z","updated_at":"2016-05-16T16:45:30.000Z","dependencies_parsed_at":null,"dependency_job_id":"37082f47-9c8a-4c1e-bece-088bb9a00c18","html_url":"https://github.com/davorg/dodgy-old-crap","commit_stats":null,"previous_names":[],"tags_count":0,"template":false,"template_full_name":null,"repository_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories/davorg%2Fdodgy-old-crap","tags_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories/davorg%2Fdodgy-old-crap/tags","releases_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories/davorg%2Fdodgy-old-crap/releases","manifests_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories/davorg%2Fdodgy-old-crap/manifests","owner_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/owners/davorg","download_url":"https://codeload.github.com/davorg/dodgy-old-crap/tar.gz/refs/heads/master","host":{"name":"GitHub","url":"https://github.com","kind":"github","repositories_count":246741183,"owners_count":20826063,"icon_url":"https://github.com/github.png","version":null,"created_at":"2022-05-30T11:31:42.601Z","updated_at":"2022-07-04T15:15:14.044Z","host_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub","repositories_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repositories","repository_names_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/repository_names","owners_url":"https://repos.ecosyste.ms/api/v1/hosts/GitHub/owners"}},"keywords":["crap","embarrassing","old","perl"],"created_at":"2024-10-27T10:48:24.459Z","updated_at":"2025-04-02T01:46:37.230Z","avatar_url":"https://github.com/davorg.png","language":"Perl","funding_links":[],"categories":[],"sub_categories":[],"readme":"# dodgy-old-crap\n\nI wrote the code in this repo many years ago. I really don't recommend looking at it unless\nyou want examples of how not to write good Perl. This code is full of bad practices and\nidioms that now look horribly out of date. More importantly, some of the code is intended\nto be run on a web server, but has huge security holes which would allow your server to\nbe hacked or (in at least one case) used as to send spam.\n\nI probably shouldn't even put the code on Github, but I'm such a packrat that I can't\nbear to see anythnig thrown away. I was reminded of the existance of this code earlier\nthis week and it's taken me a few days to track it down - so I thought that putting it\non Github would make it easier to find in the future.\n\nBut I really can't emphasise this enough - **Please don't run any of this code on a\nsystem that is connected to the internet**.\n\nSo what do we have in the various directories here?\n\n## mail\n\nA really simple formmail program. Not sure that I ever used it.\n\n## ms\n\nMy first suite of CGI program. My consulting company is called Magnum Solutions so\nit amused me to name the programs \"ms-foo\" in the hope that people might assume they\nwere from Microsoft. That didn't happen. The programs in the suite are:\n\n* **ms-env** - get information about the environment that your CGI programs are running in.\n* **ms-guest** - a guest book (remember guest books?)\n* **ms-mail** - my second attempt at a formmail program. Not much better than the first.\n* **ms-webmail** - a webmail program. Presumably written to allow me to access my personal\nemail from behind the firewall of whatever bank I was working for at the time.\n\nThis programs are all dreadful. If you're looking for stuff like this, then you would be \nmuch better advised to look at the [nms](http://nms-cgi.sf.net) project.\n\n## slavorg\n\nA very simple bot that used to sit on the #london.pm IRC channel and give ops to the\npeople that it trusted. An artifact from a far most trusting internet age.\n\n## spam\n\nNot sure about this one. I think I was trying to analyse the spam I was getting.\n\n## sqpl\n\nThis was ambitious. It's a full replacement for `isql` the command line program that\nis used to talk to Sybase databases. I can't remember what it was about `isql` that I\ndidn't like or whether this replacement was successful in fixing the problems.\n\nInteresting to see that there are two versions. `sqpl` uses DBI, the standard Perl\ndatabase interface. But there's also `sqpl.sybperl` which uses the older, proprietary,\nSybase::CTlib method.\n\n## sybserv\n\nAnother program that was useful back when I was writing Sybase programs for banks. This\nparses the file which Sybase uses to hold information about the various servers you\ncan connect to.\n\nThis maybe the only program I've ever written which uses Perl's formats.\n\n## toc\n\nThis one might still work. It parses an HTML document, looking for heading tags and\nthen creates a table of contents which it inserts into the document.\n\n## webged\n\nThis was the program that started my trying to find these programs a couple of days ago.\nIt displays genealogical data by generating a series of web pages from a\n[GEDCOM](https://en.wikipedia.org/wiki/GEDCOM) file.\n","project_url":"https://awesome.ecosyste.ms/api/v1/projects/github.com%2Fdavorg%2Fdodgy-old-crap","html_url":"https://awesome.ecosyste.ms/projects/github.com%2Fdavorg%2Fdodgy-old-crap","lists_url":"https://awesome.ecosyste.ms/api/v1/projects/github.com%2Fdavorg%2Fdodgy-old-crap/lists"}