my $dir = getcwd;
@fdirectory = readdir(DIR);
open (CLEAN_LIST, "cleanup.clean") || print "failed to open";
@clean_list = <clean_list>;
$file = $_;
$clean_list2 = $_;
$clean_list2 =~ s/\n//;
if ($file =~ /$clean_list2/ig)
$clean_list2 =~ s/\\//;
$t = $clean_list2;
`move "$file" "directory$t"`;
I remember making this a while back to clean up every file in the same directory the script’s in, so long as the file’s extension is specified in “cleanup.clean”, separated by new lines. Every now and then I run the script and clear everything off my desktop. It’s great.
A couple days ago, I reformatted my computer, realizing that 64-bits is too cool for me. Well, that, and Windows x64 sucks.
I manage to get everything to work, and then I try to re-install Perl and Apache. Apparently that didn’t work as well as I wanted it to. Although I got everything to work, CGI’s fucking acting up like it usually DOESN’T, and I found out that I have to shabang it explicitly (#!c:/Perl/bin/perl.exe instead of #!perl). That works and surprisingly Mason does TOO, but CGI-Session DOESN’T. It doesn’t write anything to the session files that I tell it to, except for starting the session up itself. So I frustratingly uninstall it and hope that when I try again later it will work.
I thought that switching back was funny. Ohh yeah, switching’s soo funny, till you fail. I need a handbanana in my life to rape the newer version of Perl or something-or-other, so that everything will work for once.
Whenever I try to create a session on my website and specify the absolute location (ex: /home/lyreamc/public_html/) of the folder, CGI::Session creates the folder and the file, but the file is never modified again; it’s as if CGI::Session isn’t working at all after that. But here’s where it gets weird. If I just set the directory to /tmp everything works perfectly, however, this is a location I have no access to via ftp (and they won’t let me ssh). I made a file to view what was in that folder, and there were a bunch of session files similar to mine. Weird. I’m not sure if it’s a permissions issue, but I’m too tired right now to care.
Oh, yeah, classes start tomorrow. I had to enroll in a hurry…
Economic History Of The US
Intro To Statistics
Contemporary Art & Theory
Was messing around with recursion in Perl for a while in an attempt to be somewhat productive and to get my mind off things at the same time… And somehow, I was successful, at the deep recursion part anyways.
http://www.lyream.com/recursion/recursion_directory.html shows deep recursion being used to list every file in C:/.
An executable and the source code in regular text is at: http://www.lyream.com/recursion/
Oh, it creates a file called “files.txt” in your c:/ root directory, containing every single file in c:/
Things are finally starting to look up in terms of web hosting. Thanks to imhosted.com, I was able to get everything configured perfectly. Although… They don’t seem to support mod_perl for some reason, so I had to find a way to get PLP to work through CGI. Ah well. Maybe I could convince them to install FactCGI or mod_perl anyways. Off to bed.
After searching for a lightweight solution to embed Perl code into HTML documents, I came across this. PLP. It has, perhaps the simplest syntax of all time, getting straight to the point. No doubt, it will be supported by nearly any webhost that supports Perl, because, it supports mod_perl AND cgi. The only problem I ran into was an internal “OK” server error. I checked the log files and it led me to an undefined subroutine: Apache::Constants. Realized it was undefined because I’m running in a mod_perl2 environment and that was a module for mod_perl(1). I changed anything in the source code which contained Apache::Constants to Apache2::Const. Works like a charm now. The only tricky thing about this module is that it hates changing headers, so adding sessions is going to take some thinking… If anyone’s interested, the link is: http://search.cpan.org/~shiar/PLP-3.19/PLP.pm
I now understand object-oriented programming in Perl (to a certain extent >.>).