[ "/projects/2138137193/iblab?ref=discovery", 2138137193, "iBlab", "/projects/2060538158/nz-hosting?ref=discovery", 2060538158, "NZ Hosting", "/projects/1956727289/how-to-build-a-spaceship?ref=discovery", 1956727289, "How To Build A Spaceship", ] ##

##

[
 [
  "/projects/2138137193/iblab?ref=discovery",
  2138137193,
  "iBlab"
 ],
 [
  "/projects/2060538158/nz-hosting?ref=discovery",
  2060538158,
  "NZ Hosting"
 ],
 [
  "/projects/1956727289/how-to-build-a-spaceship?ref=discovery",
  1956727289,
  "How To Build A Spaceship"
 ]
]

##

##

#! perl -w

use strict;
use Data::Dump qw(dump);

my $html     =           'iBlab
NZ Hosting
How To Build A Spaceship';

my @projects = $html =~ m|(.+?)|g;

dump \@projects;