Post 9yzWCtrafcFnWDaSjw by clarjon1@connected.cat6.network
(DIR) More posts by clarjon1@connected.cat6.network
(DIR) Post #9yzWCtYRomwQYqdAu0 by mdszy@mastodon.technology
2020-09-09T18:55:33Z
0 likes, 0 repeats
trying to make a shell that functions as an amazing programming language will just result in something that sucks at being both tbh
(DIR) Post #9yzWCtrafcFnWDaSjw by clarjon1@connected.cat6.network
2020-09-09T18:56:49.165445Z
0 likes, 0 repeats
@mdszy Microsoft would like to know your location.
(DIR) Post #9yzWJctSA8WAukfL2O by mdszy@mastodon.technology
2020-09-09T18:57:16Z
0 likes, 0 repeats
@clarjon1 thinking about actually writing powershell scripts makes me anxious lmfao
(DIR) Post #9yzWJd6ZNN0fZQnoTw by clarjon1@connected.cat6.network
2020-09-09T18:58:03.213906Z
0 likes, 0 repeats
@mdszy i've done it and...The language is actually a lot nicer than I expected it to be.It's really verbose but at least it makes it easy to see what the functions are and where they're being called from
(DIR) Post #9yzWNPXbkRg0f3Fi76 by clarjon1@connected.cat6.network
2020-09-09T18:58:44.702954Z
0 likes, 0 repeats
@mdszy i still like perl more tho
(DIR) Post #9yzWUoxLeZzpVnpFSa by mdszy@mastodon.technology
2020-09-09T18:58:54Z
0 likes, 0 repeats
@clarjon1 i haven't ever actually used perl lol
(DIR) Post #9yzWUpFmY2k2QyRyC0 by clarjon1@connected.cat6.network
2020-09-09T18:59:59.545407Z
0 likes, 0 repeats
@mdszy honestly the most i use perl for is for mangling text. Whiiich i kinda have to do a lot. It's been very useful for formatting things for other applications hehe.
(DIR) Post #9yzWsVNg5NJjkZR0JE by clarjon1@connected.cat6.network
2020-09-09T19:04:21.723727Z
0 likes, 0 repeats
@mdszy For example, here is a variant of one of the most used forms of this script:```use strict;use warnings;my $file = 'ListOfSteamIDs.txt';open my $info, $file or die "Could not open $file: $!";while( my $line = <$info>) { chomp $line; print "DELETE * from USER_ACCOUNTS where identifier like '" . $line . "';\n"; print "DELETE * from USERS where identifier like '" . $line . "'; \n"; print "DELETE * from BANK where identifier like '" . $line . "';\n"; }close $info;```