正则表达式什么意思啊

Perl code

open(ALLTASK , $all_task) or die "Error: Can not open allTask file!\n";    while( <ALLTASK> )    {        my $tmpline = $_;        my $alltask_dirname = $all_task;        $alltask_dirname =~ s#/[^/]+/?$##;        chomp($tmpline);        #chomp($alltask_dirname);        if (/^#/) {            next;        }        unless (/^\//) {            $tmpline = "$alltask_dirname/$tmpline";        }          }

1.$alltask_dirname =~ s#/[^/]+/?$##;这个表达式什么意思?
2./^#/ 这个表达式什么意思?
3./^\// 这个表达式什么意思?

[解决办法]
1.$alltask_dirname =~ s#/[^/]+/?$##;这个表达式什么意思?
#裸露在代码中是注释的意思，也就是说这行已经把s后面的内容注释掉了，你这语法是错的吧？


2./^#/ 这个表达式什么意思?
匹配以#开头的内容

3./^\// 这个表达式什么意思?
匹配以/开头的内容。

^表示开头，$表示结尾。