小编dre*_*res的帖子

~~Perl中的运营商是否存在相反的情况？我用它来匹配数组中的元素,如下所示:

my @arr = qw /hello ma duhs udsyyd hjgdsh/;
print "is in\n" if ('duhs' ~~ @arr);

这打印is in.这很酷,因为我没有迭代所有数组并比较每条记录.我的问题是,如果我没有匹配,我想做点什么.我可以站在else一边,但我宁愿找到相反的"~~"

我真的不明白我在这里做什么.我有这个页面profesor.php,我想在其中插入一些数据到数据库中.从表单提交数据后,我想重定向到另一个页面insert.php并显示一条消息.所以我有profesor.php:

<?php
session_start();

if (isset($_SESSION['id'])) {
    $fullname = $_SESSION['name'];
    echo "<h1> Welcome " . $fullname . "</h1>"; 
} else {
    $result = "You are not logged in yet";
}

if (isset($_POST['studname'])) {
    include_once("dbConnect.php");

    $studname = strip_tags($_POST['studname']);
    $course = strip_tags($_POST['course']);
    $grade = strip_tags($_POST['grade']);

    $getStudidStm = "SELECT userid FROM users WHERE name = '$studname'";
    $getStudidQuery = mysqli_query($dbCon, $getStudidStm);
    $row = mysqli_fetch_row($getStudidQuery);
    $studid = $row[0]; 

    $_SESSION['studid'] = $studid;
    $_SESSION['course'] = $course;
    $_SESSION['grade'] = $grade;
    header("Location: insert.php");
} …