Help for this page
my $equation = '979x + 87y - 8723z = 274320'; ... my @parts = ($equation =~ /(.*?)([xyz])/ig); print "$_\n" for @parts;
979 x ... y - 8723 z