Please keep your hands and arms inside at all times, failure to do so can result in serious injury or death X| X| .

I know you don't get these very often, so please enjoy :). And hi to everyone - forums look great these days.

my $select = "";
my (@fields) = ("field1", "field2", "field3", "field4", "field5", "field6", "field7", "field8", "field9", "field10", "field11", "field12", "field13", "field14", "field15", "field16", "field17", "field18");
foreach my $f (@fields)
{
    $select .= "$f,";
}
chop $select;

For those unfamiliar, @name= array variable, $name = scalar variable. 'chop' is interpreted as a function call with the intentional side effect of removing the last character from the scalar you pass it. As a bonus, plaintext strings surrounded by double quotes must be parsed by the interpreter (this is Perl) and variable names within them are replaced with values.

I also found something similar today

my $select = "";
my (@fields) = ("field1", "field2", "field3", "field4", "field5", "field6", "field7", "field8", "field9", "field10", "field11", "field12", "field13", "field14", "field15", "field16", "field17", "field18");
foreach my $f (@fields)
{
    $select .= "$f,";
}
chop $select;

For those unfamiliar, @name= array variable, $name = scalar variable. 'chop' is interpreted as a function call with the intentional side effect of removing the last character from the scalar you pass it. As a bonus, plaintext strings surrounded by double quotes must be parsed by the interpreter (this is Perl) and variable names within them are replaced with values.

(see title)

He's "in" with the owners, but not technically my boss.

AspDotNetDev wrote:

Remind me to never use Perl. X|

So true!

Really? That's almost as depressing as the fact that the jackass who authored this atrocity is in effect my superior.. (also, Perl)

Hey all, here's an interlude to the regularly scheduled 'weird, wide world of windows' :)

my $olddatemails = `ls -t Mailed20??????`;
my $datemailed = "";
$datemailed = $1 if ($olddatemails =~ /(20\d\d\d\d\d\d)/s);
die if ($datemailed eq "");
...

$newdate = $datemailed;
while ($parse =~ s/Mailed(20\d\d)(\d\d)(\d\d).*?\n//s)
{
$newdate = $1 . $2 . $3;
}

`mv "Mailed$datemailed" "Mailed$newdate"` if ($datemailed lt $newdate);

How many tautologies and inconsistencies can you count??? :wtf:

Seriously!!!!

install it, change the icon on the desktop back to IE's, download all her crap toolbars, and then mention something about a security update from microsoft.

well i think it's cool. Its hard to explain HTML to people, and that's about as straightforward as it gets. This one shows graphically that you have to use severak very simple instructions to get the computer to do what you want, and I think it's a much smaller step from there to (assembly, c, html, whatever).

what?? how do you use twitter without a cell phone? I know there are websites, but isn't the point to be able to do everything with SMS?

i think i replied to the wrong message. but what about the cell phone part threw you?

For a real fun time, try looking up directions to anything in Japan w/ google maps.

I think if I ever spend that much time on my cell phone, I'm forgetting something important.

i saw a comment sayin this was mostly juvenile (no drugs yet) poppies, and that wallabies normally graze in circly patterns... full of shit?

so instead of looking up the return values for a function that returns a pointer, which could be null & which you should check, you state that it would be better to do what exactly?

embrace extend extinguish

there's a commercial on a search engine? Thanks for warning me.

you just won the tinfoil hat contest for this month

ClearCode.com currently offers mortgage advice