Como eu falei, poucas mudanças fazem outra coisa totalmente diferente… diminuí o n do perlinNoise e deixei a cor da linha variar de acordo com o y:

stage.quality = “medium”;
var noise:BitmapData = new BitmapData( 300, 1000 );
noise.perlinNoise( noise.width, noise.height, 2, Math.random() * 256, true, false, 7, true );
var container:Sprite = new Sprite();
container.x = 100;
container.y = 150;
addChild( [...]

Continuando a minha idéia, fiz o primeiro teste:

Criei um PerlinNoise estreito e longo, com stitch = true pro final emendar no começo;
Criei um método pra criar uma linha de acordo com um BitmapData de y = 1;
Criei um método pra criar as linhas uma a uma a aprtir de “fatias” do PerlinNoise;
Em cada linha, fiz [...]

Depois eu arrumo, tá bom demais.