Help for this page

Select Code to Download

Select or download this
```
if (@sort_savepids ne @sort_livepids )
```

Select or download this

#!/usr/local/bin/perl
use strict;
...

print qq{s1 and s2 are equal\n} if ( @s1 eq @s2 );
print qq{s1 and s3 are equal(not really)\n} if ( @s1 eq @s3 );