[NetBehaviour] For Occupy Wall Street

[dave miller]

thanks for this James, really nice of you

It worked! I lost my rights quite easily!

thanks, dave

On 5 October 2011 17:15, James Morris <james at jwm-art.net> wrote:
> On Wed, 5 Oct 2011 15:53:32 +0100
> dave miller <dave.miller.uk at gmail.com> wrote:
>
>> Hi james
>>
>> Thanks for the tip - I did all this, think it ran ok, but didn't see
>> anything. I get the idea though, it's nice.
>>
>> I would like something to happen though - maybe just as confirmation
>> that I did it right. though I understand that's not the point!
>>
>> dave
>
> Ok,
>
> I don't know perl, but here's a modified version which does show
> something to see. (I've used '--8<---' to indicate where it starts and ends)
>
> --8<---
>
> #!/usr/bin/perl
> $right1="freedom of movement";
> $right2="freedom of expression";
> push(@rights, $right1);
> push(@rights, $right2);
> print "@rights\n";
>
> --8<---
>
> It declares two variables, $right1 and $right2, and then places them
> into an array called @rights and then prints the contents of the array.
>
> Now, perhaps to show you the meaning of Pall's script lets try claiming
> ownership of our rights!
>
> --8<---
>
> #!/usr/bin/perl
> my $right1="freedom of movement";
> my $right2="freedom of expression";
> push(@rights, my $right1);
> push(@rights, my $right2);
> print "@rights\n";
>
> --8<---
>
> See how my rights disappear!
>
> James.
>
>
> --
> http://jwm-art.net/
> image/audio/text/code/
>
> _______________________________________________
> NetBehaviour mailing list
> NetBehaviour at netbehaviour.org
> http://www.netbehaviour.org/mailman/listinfo/netbehaviour
>