Recommend adding the saylink into this text using a $sew clone:
elsif(quest::istaskactive($taskid1)) {
quest:say("I see you are making good progress on your tailoring projects. Keep up the great work and come see me when you have completed!");
to
elsif(quest::istaskactive($taskid1)) {
quest:say("Have you made progress since the last time I saw you, $name? You haven't $sew2 how to make the items I asked for have you? Keep working hard and come see me when you have completed!");
and
my $sew2 = quest::saylink("I guess I am still a little rusty on my tailoring skills. Tell me the basics again, please.", 0, "forgotten");
On second thought, the saylink is probably too long, but you get the idea