Hello everyone,

I have a mesostructure in which I wish to delete all bead connectors connected to bead A. I tried running the following script -

#!perl

use strict;
use Getopt::Long;
use MaterialsScript qw(:all);

my \\\$doc=\\\$Documents{"Mesostructure.xsd"};
my \\\$beads=\\\$doc->UnitCell->Sets("S")->Beads;
my \\\$connectors = \\\$doc->UnitCell->BeadConnectors;
foreach my \\\$connector (@\\\$connectors) {
my \\\$bead1 =\\\$doc->UnitCell->Beads("X");
my \\\$bead2 =\\\$doc->UnitCell->Beads("A");
\\\$connector->\\\$bead1; 
\\\$connector->\\\$bead2;
\\\$connector->Delete;
}

But I get the error - 'The index value is invalid (function/property "Beads") at -e line 11.' Can someone tell if there is a way to do this? 

Thanks,

Ricky